#! /bin/sh
WISH_PATH=`which wish`
if [ -z $WISH_PATH ]  
then
  echo "Can't find wish executable"
  exit 1
fi
exec 2>&1
if [ ! -e /proc/$$/status ] 
then
  echo /proc filesystem is wrong format or not mounted
  exit 2
fi
WISH_FLAG=' -f'
WISH_COMMAND=#!$WISH_PATH$WISH_FLAG
TKPS_LINES=`wc -l < /usr/X11R6/bin/tkps`
TKPS_LINES=`expr $TKPS_LINES - 1`
( echo $WISH_COMMAND 
  tail -$TKPS_LINES /usr/X11R6/bin/tkps ) > $$
mv $$ /usr/X11R6/bin
