[Win32forth-cvs] win32forth/apps/Player4 PLAYER4.F,1.16,1.17

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

Update of /cvsroot/win32forth/win32forth/apps/Player4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18187/win32forth/apps/Player4

Modified Files:
	PLAYER4.F 
Log Message:
Jos: Changed the way the icon is added. Thank's to Rod Oakford.

Index: PLAYER4.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Player4/PLAYER4.F,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -d -r1.16 -r1.17
*** PLAYER4.F	26 Jun 2005 15:49:31 -0000	1.16
--- PLAYER4.F	27 Jun 2005 19:16:54 -0000	1.17
***************
*** 534,544 ****
          false to MciDebug?
          ' player4 turnkey Player4.exe
! \        s" apps\Player4\Player4.ico" s" Player4.exe" AddAppIcon
!         s" Player4.ico" s" Player4.exe" AddAppIcon   
          1 pause-seconds
  [else]
          true to MciDebug?
! \        s" apps\Player4\Player4.ico" s" Player4.exe" AddAppIcon
!         s" Player4.ico" s" Player4.exe" AddAppIcon
          PLAYER4
  [then]
--- 534,543 ----
          false to MciDebug?
          ' player4 turnkey Player4.exe
!         s" apps\Player4\Player4.ico" Prepend<home>\ s" Player4.exe" AddAppIcon
! 
          1 pause-seconds
  [else]
          true to MciDebug?
!         s" apps\Player4\Player4.ico" Prepend<home>\ s" Player4.exe" AddAppIcon
          PLAYER4
  [then]