--- a/ApplicationModel.st	Tue Dec 27 10:43:21 2011 +0100
+++ b/ApplicationModel.st	Thu Dec 29 19:17:15 2011 +0100
@@ -587,11 +587,10 @@
     rev := ''.
 
     (clsRev := self revision) notNil ifTrue: [rev := '  (rev: ', clsRev printString, ')'].
-
-    msg := '\' withCRs , self name asBoldText, rev.
+    msg := "'\' withCRs ," self name asBoldText, rev.
     ^ msg
 
-    "Created: / 13.11.2001 / 12:28:36 / cg"
+    "Created: / 13-11-2001 / 12:28:36 / cg"
 !
 
 documentationPath
@@ -3930,11 +3929,11 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.326 2011-12-27 09:43:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.327 2011-12-29 18:17:15 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.326 2011-12-27 09:43:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.327 2011-12-29 18:17:15 cg Exp $'
 ! !
 
 ApplicationModel initialize!