# HG changeset patch # User Claus Gittinger # Date 1317326552 -7200 # Node ID 60d609b1d5fbd9b4b22a8dceb3a96bf0c1bbf79b # Parent 0d682034b2ea5ca92341af8a1e502260b062b37c changed: #revisionInfoFromString: diff -r 0d682034b2ea -r 60d609b1d5fb 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