#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Tue, 21 Nov 2017 18:34:44 +0100
changeset 22374 21349f18c5f9
parent 22373 99d8da048a8f
child 22375 0baa14a9b02e
#UI_ENHANCEMENT by cg class: Class changed: #revision fix if there is no source code manager; fall back to CVSManager then, unless a default was set.
Class.st
--- a/Class.st	Tue Nov 21 13:16:01 2017 +0100
+++ b/Class.st	Tue Nov 21 18:34:44 2017 +0100
@@ -2002,6 +2002,7 @@
     "Created: / 18-07-2011 / 09:14:38 / cg"
 ! !
 
+
 !Class methodsFor:'adding & removing'!
 
 removeFromSystem
@@ -5043,15 +5044,28 @@
      To check if a source corresponds to a compiled binary, compare this
      ID with the one returned by #binaryRevision."
 
-    ^ self revisionOfManager:self sourceCodeManager
+    |mgr|
+
+    mgr := self sourceCodeManager.
+    mgr isNil ifTrue:[
+        AbstractSourceCodeManager notNil ifTrue:[
+            mgr := AbstractSourceCodeManager defaultManager.
+        ].    
+        mgr isNil ifTrue:[
+            mgr := CVSSourceCodeManager.
+        ].    
+    ].    
+    ^ self revisionOfManager:mgr
 
     "
      Object revision
+     Expecco::ReportParameterEditorForProjects revision
+     Expecco::ReportParameterEditorForProjects sourceCodeManager
     "
 
     "Created: / 11-11-1995 / 14:27:20 / cg"
     "Modified: / 26-03-1997 / 00:14:00 / stefan"
-    "Modified: / 04-09-2011 / 11:03:59 / cg"
+    "Modified: / 21-11-2017 / 18:34:08 / cg"
 !
 
 revisionDateString