shithub: bin.rc

ref: 1bab993af3da2ba2ee9e84d8602c9ae67f7c58d1
dir: /bin/21/

View raw version 
#!/bin/rc
# 21 - poor man's acme 2-1 chord for sam
rfork e
for(i in `{seq 1 $#*})
	args=($args ''''$$i'''')
cat >/env/pgm <<'.'
cd `{basename -d $%}
$* $"%s
cat
.
window -m 'rc /env/pgm '$"args