diff --git a/src/worksp/gc2/make.ss b/src/worksp/gc2/make.ss index b339f701b1..7c0789e61c 100644 --- a/src/worksp/gc2/make.ss +++ b/src/worksp/gc2/make.ss @@ -246,10 +246,15 @@ srcs))]) (link-dll objs null null dll "" #f)) -(unless (file-exists? "mzscheme.res") - (system- (string-append - "rc /l 0x409 " - "/fomzscheme.res ../mzscheme/mzscheme.rc"))) +(define (check-rc res rc) + (unless (and (file-exists? res) + (>= (file-or-directory-modify-seconds res) + (file-or-directory-modify-seconds rc))) + (system- (string-append + "rc /l 0x409 /I ../../wxwindow/include/msw /I ../../wxwindow/contrib/fafa " + (format "/fo~a ~a" res rc))))) + +(check-rc "mzscheme.res" "../mzscheme/mzscheme.rc") (let ([objs (list "mzscheme.res" @@ -445,10 +450,7 @@ (wx-try "mred" "mred" "mrmain" #f "cxx" #t) -(unless (file-exists? "mred.res") - (system- (string-append - "rc /l 0x409 /I ../../wxwindow/include/msw /I ../../wxwindow/contrib/fafa " - "/fomred.res ../mred/mred.rc"))) +(check-rc "mred.res" "../mred/mred.rc") (let ([objs (list "mred.res" diff --git a/src/worksp/mred/mred.manifest b/src/worksp/mred/mred.manifest index 105bb9ba7a..9db80e934b 100644 --- a/src/worksp/mred/mred.manifest +++ b/src/worksp/mred/mred.manifest @@ -3,7 +3,7 @@ MrEd - Graphical PLT Scheme. diff --git a/src/worksp/mred/mred.rc b/src/worksp/mred/mred.rc index 3852704322..cad4f19884 100644 --- a/src/worksp/mred/mred.rc +++ b/src/worksp/mred/mred.rc @@ -36,13 +36,13 @@ BEGIN BEGIN BLOCK "040904b0" BEGIN - VALUE "CompanyName", "PLT Inc.\0" - VALUE "FileDescription", "mred\0" + VALUE "CompanyName", "PLT Scheme Inc.\0" + VALUE "FileDescription", "MrEd-based application\0" + VALUE "InternalName", "MrEd.exe\0" VALUE "FileVersion", "349, 100, 0, 0\0" - VALUE "InternalName", "mred\0" VALUE "LegalCopyright", "Copyright 1995-2006\0" VALUE "OriginalFilename", "MrEd.exe\0" - VALUE "ProductName", "MrEd\0" + VALUE "ProductName", "PLT Scheme\0" VALUE "ProductVersion", "349, 100, 0, 0\0" END END diff --git a/src/worksp/mzscheme/mzscheme.rc b/src/worksp/mzscheme/mzscheme.rc index 8bb660c6f9..202f8c41ef 100644 --- a/src/worksp/mzscheme/mzscheme.rc +++ b/src/worksp/mzscheme/mzscheme.rc @@ -45,13 +45,13 @@ BEGIN BEGIN BLOCK "040904b0" BEGIN - VALUE "CompanyName", "PLT Inc.\0" - VALUE "FileDescription", "mzscheme\0" + VALUE "CompanyName", "PLT Scheme Inc.\0" + VALUE "FileDescription", "MzScheme-based application\0" + VALUE "InternalName", "MzScheme.exe\0" VALUE "FileVersion", "349, 100, 0, 0\0" - VALUE "InternalName", "mzscheme\0" VALUE "LegalCopyright", "Copyright 1995-2006\0" VALUE "OriginalFilename", "mzscheme.exe\0" - VALUE "ProductName", "MzScheme\0" + VALUE "ProductName", "PLT Scheme\0" VALUE "ProductVersion", "349, 100, 0, 0\0" END END