[Win32forth-cvs] win32forth/src/console NewConsole.f,1.19,1.20

[Jos v.d.V. <jo...@us...>]

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

Modified Files:
	NewConsole.f 
Log Message:
Jos: Made turnkey behave like the previous versions of Win32Forth.
That means you do not have to enter a messageloop manualy after starting the EXE of a turnkey.
Also removed the test beep.

Index: NewConsole.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/console/NewConsole.f,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -d -r1.19 -r1.20
*** NewConsole.f	16 Aug 2008 13:31:47 -0000	1.19
--- NewConsole.f	17 Aug 2008 20:59:02 -0000	1.20
***************
*** 412,420 ****
  ' menukey-more is LogKeyStrokes
  
! : New-default-hello ( -- )                          \ for turnkey
          initialization-chain do-chain
          exception@ if bye then
!         get-commandline  beep               \ commandline to SOURCE
          default-application
          ;
  
--- 412,421 ----
  ' menukey-more is LogKeyStrokes
  
! : New-default-hello ( -- )             \ for turnkey
          initialization-chain do-chain
          exception@ if bye then
!         get-commandline                \ commandline to SOURCE
          default-application
+         Messageloop
          ;