3 set SELF_PATH
= `which $0`
4 if ( `echo $SELF_PATH | grep '^/'` == "" ) then
5 set SELF_PATH
= `pwd`/$SELF_PATH:h
7 set SELF_PATH
= $SELF_PATH:h
9 if ( `echo $SELF_PATH | grep '/\.$'` != "" ) then
10 set SELF_PATH
= $SELF_PATH:h
13 #xterm -sb -sl 9999 -geometry 80x24 -bg lightcyan -T pan \
14 # -e $SELF_PATH/pan $* &
16 $SELF_PATH/pan
-spawn $
*