equal
deleted
inserted
replaced
329 mgr := SourceCodeManager ? CVSSourceCodeManager. |
329 mgr := SourceCodeManager ? CVSSourceCodeManager. |
330 "/ |
330 "/ |
331 "/ care for standAlone apps which have no CVS (libbasic3) included |
331 "/ care for standAlone apps which have no CVS (libbasic3) included |
332 "/ |
332 "/ |
333 mgr isNil ifTrue:[ |
333 mgr isNil ifTrue:[ |
334 AbstractSourceCodeManager notNil ifTrue:[ |
334 AbstractSourceCodeManager notNil ifTrue:[ |
335 ^ AbstractSourceCodeManager revisionInfoFromRCSString:aString |
335 ^ CVSVersionInfo fromRCSString:aString |
336 ]. |
336 ]. |
337 ^ nil |
337 ^ nil |
338 ]. |
338 ]. |
339 ^ mgr revisionInfoFromString:aString. |
339 ^ mgr revisionInfoFromString:aString. |
340 |
340 |
341 "Modified: / 22-10-2008 / 20:27:21 / cg" |
341 "Modified: / 29-09-2011 / 21:53:29 / cg" |
342 ! |
342 ! |
343 |
343 |
344 revisionStringFromSource:aMethodSourceString |
344 revisionStringFromSource:aMethodSourceString |
345 "{ Pragma: +optSpace }" |
345 "{ Pragma: +optSpace }" |
346 |
346 |
5422 ! ! |
5422 ! ! |
5423 |
5423 |
5424 !Class class methodsFor:'documentation'! |
5424 !Class class methodsFor:'documentation'! |
5425 |
5425 |
5426 version |
5426 version |
5427 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.594 2011-09-29 13:15:34 cg Exp $' |
5427 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.595 2011-09-29 20:02:32 cg Exp $' |
5428 ! |
5428 ! |
5429 |
5429 |
5430 version_CVS |
5430 version_CVS |
5431 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.594 2011-09-29 13:15:34 cg Exp $' |
5431 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.595 2011-09-29 20:02:32 cg Exp $' |
5432 ! |
5432 ! |
5433 |
5433 |
5434 version_SVN |
5434 version_SVN |
5435 ^ '§ Id: Class.st 10643 2011-06-08 21:53:07Z vranyj1 §' |
5435 ^ '§ Id: Class.st 10643 2011-06-08 21:53:07Z vranyj1 §' |
5436 ! ! |
5436 ! ! |