[Win32forth-cvs] win32forth/src/console ConsoleMenu.f,1.9,1.10

[Dirk B. <db...@us...>]

Update of /cvsroot/win32forth/win32forth/src/console
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv6137/src/console

Modified Files:
	ConsoleMenu.f 
Log Message:
- Some minor changes

Index: ConsoleMenu.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/console/ConsoleMenu.f,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** ConsoleMenu.f	25 Feb 2007 19:05:07 -0000	1.9
--- ConsoleMenu.f	12 May 2007 07:49:21 -0000	1.10
***************
*** 115,119 ****
     if 0= open-web              EXIT then
                  over [ K_F12                   ] literal =
!    if 0= 2>r >r  LoadProject  r> 2r>          EXIT then
                  over [ 'L' +k_control          ] literal =
     if 0=   load-forth            EXIT then
--- 115,119 ----
     if 0= open-web              EXIT then
                  over [ K_F12                   ] literal =
! \in-system-ok   if 0= 2>r >r LoadProject  r> 2r> EXIT then
                  over [ 'L' +k_control          ] literal =
     if 0=   load-forth            EXIT then
***************
*** 243,247 ****
          MENULINE    "Win32Forth IDE"			".IDE"
          MENULINE    "ForthForm"				".ForthForm"
!         MENUITEM    "Compile &Project\tF12"               LoadProject ;
   MENUSEPARATOR
          MENULINE    "&Class and Vocabulary browser..."	"class-browser"
--- 243,247 ----
          MENULINE    "Win32Forth IDE"			".IDE"
          MENULINE    "ForthForm"				".ForthForm"
! \in-system-ok        MENUITEM    "Compile &Project\tF12"               LoadProject ;
   MENUSEPARATOR
          MENULINE    "&Class and Vocabulary browser..."	"class-browser"