Index: mttroot/mtt/bin/xmtt
==================================================================
--- mttroot/mtt/bin/xmtt
+++ mttroot/mtt/bin/xmtt
@@ -13,10 +13,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.4  1999/10/19 00:34:10  peterg
+## *** empty log message ***
+##
 ## Revision 1.3  1999/08/18 06:17:55  peterg
 ## Modular form
 ##
 ## Revision 1.2  1999/03/09 00:03:55  peterg
 ## Major revisions for release 3.5
@@ -31,13 +34,13 @@
   case $1 in
 	--help )    echo xmtt
 	            echo xmtt -update
 		    exit;;
 	-update )    echo Creating representation list for mtt;
-		mtt2reps_txt> $MTTPATH/REPS;
-		echo Creating examples list for mtt;
-		mtt -q help examples> $MTTPATH/EXAMPLES;;
+		     mtt2reps_txt> $MTTPATH/REPS;
+		     echo Creating examples list for mtt;
+		     mtt -q help examples> $MTTPATH/EXAMPLES;;
         -example )    examples='examples';; 
 	*)
 		echo "$1 is an invalid argument - ignoring" ;;
   esac
   shift
@@ -48,10 +51,11 @@
     cd $1; 
     xmtt
     exit
 fi
 
-# Use wish
-mtt_make_menu | wish -name xmtt
+## Create the menu
+mtt_make_menu > .xmtt_menu
 
-
-
+## Use tk shell (wish)
+name=`basename $PWD`
+wish .xmtt_menu  -name $name