--- a/SmalltalkCodeGeneratorTool.st	Wed Jun 24 06:49:52 2015 +0200
+++ b/SmalltalkCodeGeneratorTool.st	Fri Jun 26 06:37:06 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -1782,15 +1780,19 @@
                 scm := aClass theNonMetaclass sourceCodeManager.
                 scm == CVSSourceCodeManager ifTrue:[
                     log := CVSSourceCodeManager revisionLogOf:aClass fromRevision:'1.1' toRevision:'1.1'.
-                    (firstRev := (log at:#revisions) firstIfEmpty:nil) notNil ifTrue:[     
-                        firstRevDate := firstRev at:#date ifAbsent:nil.
-                        firstRevDate notNil ifTrue:[
-                            firstRevDate := Date readFrom:firstRevDate onError:nil. 
-                            firstRevDate notNil ifTrue:[    
-                                initialYear := firstRevDate year.
+                    log isNil ifTrue:[
+                        initialYear := thisYear
+                    ] ifFalse:[
+                        (firstRev := (log at:#revisions) firstIfEmpty:nil) notNil ifTrue:[     
+                            firstRevDate := firstRev at:#date ifAbsent:nil.
+                            firstRevDate notNil ifTrue:[
+                                firstRevDate := Date readFrom:firstRevDate onError:nil. 
+                                firstRevDate notNil ifTrue:[    
+                                    initialYear := firstRevDate year.
+                                ]
                             ]
                         ]
-                    ]
+                    ].
                 ].
             ].
             thisYear ~= initialYear ifTrue:[
@@ -2744,14 +2746,14 @@
 !SmalltalkCodeGeneratorTool class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.37 2015-03-06 12:37:16 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkCodeGeneratorTool.st,v 1.37 2015-03-06 12:37:16 cg Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: SmalltalkCodeGeneratorTool.st,v 1.37 2015-03-06 12:37:16 cg Exp $'
+    ^ '$Id$'
 ! !