shithub: bin.rc

ref: 17ffc25b2303538e71895e660fce6640d5b1dc3b
dir: /bin/samv/

View raw version 
#!/bin/rc
# samv [-m] [samflags] [file ...]
rfork e
flags=(-a)
while(~ $1 -*){
	switch($1){
	case *
		flags=($flags $1)
	}
	shift
}
files=($%)
if(! ~ $#* 0)
	files=($files $*)
cmd=(sam $flags $files)
unmount /mnt/plumb
window -m $cmd