--- a/ToolApplicationModel.st	Fri Oct 27 14:35:30 2006 +0200
+++ b/ToolApplicationModel.st	Fri Oct 27 17:13:07 2006 +0200
@@ -1164,7 +1164,9 @@
     rev := ''.
     myClass := self class.
 
-    (clsRev := myClass revision) notNil ifTrue: [rev := '  (rev: ', clsRev printString, ')'].
+    (clsRev := myClass revision) notNil ifTrue: [
+        rev := '  (rev: ', clsRev printString, ')'
+    ].
 
     msg := '\The application\\' withCRs
         , myClass name asBoldText, rev
@@ -1174,8 +1176,8 @@
     msg := msg withTabsExpanded.
     ^msg
 
-    "Modified: / 12.3.1999 / 00:12:13 / cg"
-    "Created: / 13.11.2001 / 12:34:19 / cg"
+    "Created: / 13-11-2001 / 12:34:19 / cg"
+    "Modified: / 27-10-2006 / 16:13:35 / cg"
 !
 
 defaultInfoLabel
@@ -1626,5 +1628,5 @@
 !ToolApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.129 2006-10-25 15:29:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.130 2006-10-27 15:13:07 cg Exp $'
 ! !