[Win32forth-cvs] win32forth/apps/Win32ForthIDE ProjectTree.f, 1.22, 1.23

[Ezra B. <ezr...@us...>]

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

Modified Files:
	ProjectTree.f 
Log Message:
IDE updates. EAB

Index: ProjectTree.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Win32ForthIDE/ProjectTree.f,v
retrieving revision 1.22
retrieving revision 1.23
diff -C2 -d -r1.22 -r1.23
*** ProjectTree.f	27 Jul 2008 07:21:51 -0000	1.22
--- ProjectTree.f	8 Sep 2008 03:07:10 -0000	1.23
***************
*** 769,772 ****
--- 769,779 ----
          ; IDM_NEW_PRJ SetCommand
  
+ : close-project	( -- )
+         SaveIfModified 0= ?exit
+ 	s" Project" SetProjectName: TheProject
+         pad 0 SetBuildFile: TheProject
+         pad 0 (open-project)
+ 	; IDM_CLOSE_PRJ SetCommand
+ 
  : open-project  ( -- )
  \ Open a project