Class.st
changeset 17161 3c0beb9bedd1
parent 17160 bf601ce121a1
child 17252 37c4a7debbae
--- a/Class.st	Fri Nov 28 18:37:15 2014 +0100
+++ b/Class.st	Fri Nov 28 20:42:42 2014 +0100
@@ -4997,8 +4997,8 @@
         "/ cg: I am not sure if this is the correct thing to do, iff the passed in scm-manager
         "/ was not nil. It will return another manager's revision info. Please check.
         vsnString := self revisionStringOfManager:nil.
+        vsnString isNil ifTrue:[^ nil].
     ].
-    vsnString isNil ifTrue:[^ nil].
 
     aSourceCodemanagerOrNil notNil ifTrue:[
         info := aSourceCodemanagerOrNil revisionInfoFromString:vsnString inClass:self
@@ -5740,11 +5740,11 @@
 !Class class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.648 2014-11-28 17:37:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.649 2014-11-28 19:42:42 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.648 2014-11-28 17:37:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.649 2014-11-28 19:42:42 cg Exp $'
 !
 
 version_SVN