[Win32forth-cvs] win32forth/Templates MinimalWindow.f, 1.2, 1.3 SplitterWindow2.f, 1.2, 1.3 TreeViewInSplitWindow.f, 1.4, 1.5

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

Update of /cvsroot/win32forth/win32forth/Templates
In directory vz-cvs-4.sog:/tmp/cvs-serv21592

Modified Files:
	MinimalWindow.f SplitterWindow2.f TreeViewInSplitWindow.f 
Log Message:
Jos Removed Close: self from On_Done: since it might cause a loop

Index: SplitterWindow2.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Templates/SplitterWindow2.f,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** SplitterWindow2.f	17 Aug 2008 15:04:24 -0000	1.2
--- SplitterWindow2.f	14 Feb 2012 13:59:21 -0000	1.3
***************
*** 153,157 ****
  
  :M On_Done:     ( h m w l -- res )
-         Close: self
          0 call PostQuitMessage drop
          On_Done: super 0
--- 153,156 ----
***************
*** 171,175 ****
          turnkey? if MessageLoop bye then  ;
  
! turnkey? [if]
          ' main turnkey App.exe
          s" WIN32FOR.ICO" s" App.exe" AddAppIcon
--- 170,174 ----
          turnkey? if MessageLoop bye then  ;
  
! turnkey? not [if]
          ' main turnkey App.exe
          s" WIN32FOR.ICO" s" App.exe" AddAppIcon

Index: TreeViewInSplitWindow.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Templates/TreeViewInSplitWindow.f,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** TreeViewInSplitWindow.f	3 Jun 2010 08:56:38 -0000	1.4
--- TreeViewInSplitWindow.f	14 Feb 2012 13:59:21 -0000	1.5
***************
*** 271,275 ****
  
  :M On_Done:     ( h m w l -- res )
-         Close: self
          0 call PostQuitMessage drop
          On_Done: super 0
--- 271,274 ----

Index: MinimalWindow.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/Templates/MinimalWindow.f,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** MinimalWindow.f	17 Aug 2008 15:04:24 -0000	1.2
--- MinimalWindow.f	14 Feb 2012 13:59:21 -0000	1.3
***************
*** 19,23 ****
  
  :M On_Done:             ( -- )
-                         Close: self
                          0 call PostQuitMessage drop
                          On_Done: super 0
--- 19,22 ----