hlfw.ca

rc

ref: dbe11bbe99e7a405ce78b7ebf963b684ca3891bf
dir: /dropbar/

View raw version
#!/bin/rc

while(line=`{read}){
	switch($line){
	case '*○'
		# we don't have external window control yet
		break
	case '*◌'
		break
	case '*◍'
		break
	case *
		l=`{echo $line | sed 's/[1-6] //'}
		if(! ~ $#l 0 && test -f $home/lib/namespace.$l){
			rm /srv/work >[2]/dev/null
			unmount /mnt/work >[2]/dev/null
			/$objtype/bin/plumb -t text -d notify -a 'message=none' none
		}
	}
}