changed: #revisionInfoFromString:
authorClaus Gittinger <cg@exept.de>
Thu, 29 Sep 2011 22:02:32 +0200
changeset 13759 60d609b1d5fb
parent 13758 0d682034b2ea
child 13760 014d950482d7
changed: #revisionInfoFromString:
Class.st
--- a/Class.st	Thu Sep 29 21:44:23 2011 +0200
+++ b/Class.st	Thu Sep 29 22:02:32 2011 +0200
@@ -331,14 +331,14 @@
     "/ care for standAlone apps which have no CVS (libbasic3) included
     "/
     mgr isNil ifTrue:[
-	AbstractSourceCodeManager notNil ifTrue:[
-	    ^ AbstractSourceCodeManager revisionInfoFromRCSString:aString
-	].
-	^ nil
+        AbstractSourceCodeManager notNil ifTrue:[
+            ^ CVSVersionInfo fromRCSString:aString 
+        ].
+        ^ nil
     ].
     ^ mgr revisionInfoFromString:aString.
 
-    "Modified: / 22-10-2008 / 20:27:21 / cg"
+    "Modified: / 29-09-2011 / 21:53:29 / cg"
 !
 
 revisionStringFromSource:aMethodSourceString
@@ -5424,11 +5424,11 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.594 2011-09-29 13:15:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.595 2011-09-29 20:02:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.594 2011-09-29 13:15:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.595 2011-09-29 20:02:32 cg Exp $'
 !
 
 version_SVN