--- a/ApplicationDefinition.st	Tue Jun 23 06:44:56 2015 +0200
+++ b/ApplicationDefinition.st	Wed Jun 24 06:49:39 2015 +0200
@@ -1421,7 +1421,7 @@
         ifTrue:[
             self replaceMappings: 
                 (Dictionary new 
-                    at: 'CLASS' put:( self st2c:(self package copy asString replaceAny:':/' with:$_) );
+                    at: 'CLASS' put:( self st2c:(ProjectDefinition projectDefinitionClassNameForDefinitionOf:self package) );
                     yourself)
                 in: extensionLineTemplate
             ]
@@ -3145,11 +3145,11 @@
 !ApplicationDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ApplicationDefinition.st,v 1.266 2015-06-02 15:48:17 sr Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ApplicationDefinition.st,v 1.266 2015-06-02 15:48:17 sr Exp $'
+    ^ '$Header$'
 !
 
 version_SVN