home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 February / PCWorld_2000-02_cd.bin / live / usr / X11R6 / bin / pop-tkdesk < prev    next >
Text File  |  1998-10-10  |  631b  |  27 lines
  1. #!/bin/sh
  2. #
  3. # Usage: pop-tkdesk file
  4. # Opens the specified files by performing the default action of their
  5. # associated TkDesk popup menu (this is the first menu item), or asks
  6. # for a command to execute if no files are given.
  7.  
  8. if [ $# -gt 0 ]; then
  9.   if [ $# -gt 1 ]; then
  10.     echo "`basename $0`: can only display the popup for one file"
  11.     exit 1
  12.   fi
  13.   
  14.   FILES=
  15.   for f in $@; do
  16.     if [ -z "`echo $f | grep '^[/~]'`" ]; then
  17.       FILES="`pwd`/$f $FILES"
  18.     else
  19.       FILES="$f $FILES"
  20.     fi
  21.   done
  22.   tkdeskclient "cd `pwd`; dsk_show_popup `echo $FILES`; cd" >/dev/null 
  23. else
  24.   echo "usage: pop-tkdesk file"
  25.   exit 2
  26. fi
  27.