--- a/ProjectDefinition.st	Thu Sep 07 17:14:25 2006 +0200
+++ b/ProjectDefinition.st	Thu Sep 07 17:14:47 2006 +0200
@@ -342,7 +342,7 @@
     "
 
     "Created: / 09-08-2006 / 15:45:54 / fm"
-    "Modified: / 17-08-2006 / 14:17:59 / cg"
+    "Modified: / 07-09-2006 / 15:50:54 / cg"
 !
 
 pathToTop_win32
@@ -356,7 +356,7 @@
     "
 
     "Created: / 09-08-2006 / 15:45:54 / fm"
-    "Modified: / 17-08-2006 / 14:25:28 / cg"
+    "Modified: / 07-09-2006 / 15:51:00 / cg"
 !
 
 requiredProjects
@@ -1041,9 +1041,11 @@
     fileNamesAndSelectors := self fileNamesToGenerate asOrderedCollection.
     fileNamesAndSelectors 
                 add:(Array 
-                        with:self packageName , '.rc'
+                        with:self rcFilename
                         with:#'generate_packageName_dot_rc').
     fileNamesAndSelectors pairsDo:aTwoArgBlock
+
+    "Modified: / 07-09-2006 / 17:07:58 / cg"
 !
 
 generateFile:filename
@@ -1053,13 +1055,13 @@
                 ^ self perform:action
             ].
         ].
-    filename = 'application.rc' ifTrue:[
+    (filename = 'application.rc' or:[filename = self rcFilename]) ifTrue:[
         ^ self generate_packageName_dot_rc
     ].
     self error:('File "%1" not appropriate (not generated) for this type of project.'
                 bindWith:filename)
 
-    "Modified: / 30-08-2006 / 19:22:52 / cg"
+    "Modified: / 07-09-2006 / 17:08:38 / cg"
 !
 
 generate_abbrev_dot_stc
@@ -1251,6 +1253,12 @@
 
     "Modified: / 09-08-2006 / 11:31:09 / fm"
     "Modified: / 21-08-2006 / 19:33:21 / cg"
+!
+
+rcFilename
+    ^ self packageName,'.rc'.
+
+    "Created: / 07-09-2006 / 17:07:00 / cg"
 ! !
 
 !ProjectDefinition class methodsFor:'file templates'!
@@ -2244,7 +2252,7 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.52 2006-09-07 11:37:48 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.53 2006-09-07 15:14:47 cg Exp $'
 ! !
 
 ProjectDefinition initialize!