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

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

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

Modified Files:
	Extend.f 
Log Message:
- Fixed F12 in WinEd, SciEdit and the Win32Forth IDE. Now it should work when a Win32Forth turnkey application with an embedded console window (e.g. Solipon) is running, too.

Index: Extend.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Extend.f,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** Extend.f	29 Aug 2005 15:56:27 -0000	1.9
--- Extend.f	22 Jul 2006 08:21:53 -0000	1.10
***************
*** 98,101 ****
--- 98,104 ----
  \ set title of the console window
  \ August 31st, 2003 - 13:24 dbu (SF-ID 778673)
+ \
+ \ Note: If the window title for a stand alone Forth console window is changed here
+ \ the word BuildWin32ForthName in SciEdit, WinEd and the IDE must be changed, too !!!
  : (ConsoleTitle) { \ $buff -- }
          256 LocalAlloc: $buff
***************
*** 122,126 ****
  
                  ed-ptr  0<>                     \ if shared memory was inited
!                 IF   
                       ed-forth-count @ 1 >
                       IF   TRUE to second-forth?
--- 125,129 ----
  
                  ed-ptr  0<>                     \ if shared memory was inited
!                 IF
                       ed-forth-count @ 1 >
                       IF   TRUE to second-forth?