#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Fri, 18 Nov 2016 12:23:58 +0100
changeset 20985 76eb19c9242e
parent 20984 d046880c5d27
child 20986 3758c77e6af0
#DOCUMENTATION by cg class: ProjectDefinition changed: #legalCopyright
ProjectDefinition.st
--- a/ProjectDefinition.st	Fri Nov 18 12:20:45 2016 +0100
+++ b/ProjectDefinition.st	Fri Nov 18 12:23:58 2016 +0100
@@ -3029,25 +3029,29 @@
      Under win32, this is placed into the dll's file-info.
      Other systems may put it elsewhere, or ignore it."
 
-     |m|
+    |m thisYear template|
      
-     m := self module.
+    m := self module.
+    thisYear := Date today year.
+
     m = 'stx' ifTrue:[
         "hardwired-default"
-        ^ 'Copyright Claus Gittinger 1988-%1\nCopyright eXept Software AG %1' bindWith:(Date today year)
-    ].
-    m = 'exept' ifTrue:[
-        "hardwired-default"
-        ^ 'Copyright eXept Software AG %1' bindWith:(Date today year)
-    ].
-
-    ^ 'My CopyRight or CopyLeft'
-
-    "
-        self legalCopyright
-    "
-
-    "Modified: / 30-08-2006 / 18:53:36 / cg"
+        template := 'Copyright Claus Gittinger %1\nCopyright eXept Software AG %1' 
+    ] ifFalse:[
+        m = 'exept' ifTrue:[
+            "hardwired-default"
+            template := 'Copyright eXept Software AG %1' 
+        ] ifFalse:[
+            template := 'My CopyRight or CopyLeft %1'
+        ].
+    ].
+    ^ template bindWith:thisYear
+
+    "
+     self legalCopyright
+    "
+
+    "Modified (comment): / 18-11-2016 / 12:23:36 / cg"
 !
 
 majorVersionNr