[Win32forth-cvs] win32forth/apps/Win32ForthIDE Main.f,1.52,1.53

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

Update of /cvsroot/win32forth/win32forth/apps/Win32ForthIDE
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv24329/Win32ForthIDE

Modified Files:
	Main.f 
Log Message:
Jos: To simplify console applications. Saving boring cut and past actions.

Index: Main.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Win32ForthIDE/Main.f,v
retrieving revision 1.52
retrieving revision 1.53
diff -C2 -d -r1.52 -r1.53
*** Main.f	27 Jul 2008 07:21:51 -0000	1.52
--- Main.f	16 Aug 2008 13:31:24 -0000	1.53
***************
*** 1229,1244 ****
  
         [DEFINED]  C_EMIT  [IF]  \ When the new console is used
!        : New_default-hello ( -- )                          \ startup stuff
!                  initialization-chain do-chain
!                  NewConsole
!                  init-console drop   \ start console hidden
! \                init-screen         \ start console visible
!                  unset-except set-except   \ exception handling needs to be set after the console is started
!                  exception@ if bye then
! \                get-commandline               \ commandline to SOURCE
!                  StopLaunching not             \ if instance allowed to run
!                  if default-application then   \ then run it
!                  ;
!                  ' New_default-hello is default-hello
         [THEN]
  
--- 1229,1233 ----
  
         [DEFINED]  C_EMIT  [IF]  \ When the new console is used
! 		in-hidden-console
         [THEN]