NewChangesBrowser.st
changeset 9180 ea28dedc13aa
parent 9179 20f04cffb483
child 10247 8517600df5c5
--- a/NewChangesBrowser.st	Wed Nov 04 15:56:53 2009 +0100
+++ b/NewChangesBrowser.st	Wed Nov 04 16:44:32 2009 +0100
@@ -2847,7 +2847,7 @@
                                     sel := (p args at:1) evaluate.
 
                                     DeltaInfoColumn ifTrue:[
-                                        (changeClass isNil or:[changeClass isLoaded not]) ifTrue:[
+                                        (changeClass isNil or:[changeClass isLoaded not or:[sel isNil]]) ifTrue:[
                                             changeDelta := '?'
                                         ] ifFalse:[
                                             (changeClass implements:sel asSymbol) ifTrue:[
@@ -2991,7 +2991,7 @@
                                             ].
                                         ].
 
-                                        (changeClass isNil or:[cls isLoaded not]) ifTrue:[
+                                        (changeClass isNil or:[cls isLoaded not or:[sel isNil]]) ifTrue:[
                                             changeDelta := '?'
                                         ] ifFalse:[
                                             (changeClass implements:sel asSymbol) ifFalse:[
@@ -3849,9 +3849,9 @@
 !NewChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.31 2009-11-04 14:56:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.32 2009-11-04 15:44:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.31 2009-11-04 14:56:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewChangesBrowser.st,v 1.32 2009-11-04 15:44:32 cg Exp $'
 ! !