hlfw.ca

rc

ref: b83af1b4771da71841bc4f3a94f831d4d16a724e
dir: /smenu/

#!/bin/rc
rfork en

fn usage {
	echo 'Usage: $0 [-p path] $cmd' >[1=2]
	echo 'Usage: cmd | $0 -i' >[1=2]
	exit usage
}

wdir=()
input=()

while(~ $1 -*){
	switch($1){
	case -p
		wdir=$2
		shift; shift
	case -i
		input="true"
		shift;
	}
}

if(~ $#input 1){
	cmd=`{fm -p}
	if(~ $#cmd 0)
		exit 'no selection'
	echo $cmd
	exit
}
	
if(~ $#* 0) 
	usage

if(~ $#wdir 1)
	cd $wdir

cmd=`{$* | fm -p}
if(~ $#cmd 0)
	exit 'no selection'

echo $cmd