[Win32forth-cvs] win32forth/apps/Win32ForthIDE Main.f,1.62,1.63

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

Update of /cvsroot/win32forth/win32forth/apps/Win32ForthIDE
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv9372/apps/Win32ForthIDE

Modified Files:
	Main.f 
Log Message:
Moved the manifest into the exe file.

Index: Main.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Win32ForthIDE/Main.f,v
retrieving revision 1.62
retrieving revision 1.63
diff -C2 -d -r1.62 -r1.63
*** Main.f	10 Apr 2009 16:51:09 -0000	1.62
--- Main.f	19 Apr 2009 07:26:06 -0000	1.63
***************
*** 1408,1415 ****
  \       ' Mainsaved ' SAVE catch win32forthIDE.exe checkstack
  
!        &appdir off
!        throw
  
!        s" src\res\SciEditMDI.ico" s" win32forthIDE.exe" Prepend<home>\ AddAppIcon
  
         1 pause-seconds bye
--- 1408,1430 ----
  \       ' Mainsaved ' SAVE catch win32forthIDE.exe checkstack
  
!         &appdir off
!         throw
  
!         \ add the resources to the exe file
!         winver winnt4 >=
!         [if]
! 
!                 &forthdir count pad place
!                 s" win32forthIDE.exe" pad +place
!                 pad count "path-file drop AddToFile
! 
!                 CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST s" res\win32forthIDE.exe.manifest" "path-file drop  AddResource
!                 101 s" res\win32forthIDE.ico" "path-file drop AddIcon
! 
!                 false EndUpdate
! 
!         [else]
!                s" src\res\SciEditMDI.ico" s" win32forthIDE.exe" Prepend<home>\ AddAppIcon
!         [then]
  
         1 pause-seconds bye