*** empty log message ***
authormartin
Fri, 22 Nov 2002 16:14:19 +0100
changeset 4307 8cee1411511f
parent 4306 85f5855e382d
child 4308 9957b7ab92e3
*** empty log message ***
NewSystemBrowser.st
Tools__NewSystemBrowser.st
--- a/NewSystemBrowser.st	Fri Nov 22 14:44:00 2002 +0100
+++ b/NewSystemBrowser.st	Fri Nov 22 16:14:19 2002 +0100
@@ -12186,7 +12186,7 @@
      generator selectedMethods selectedMethod
      myGenerator myGeneratorsHome |
 
-    selectedMethods := (navigationState selectedMethodsArrayAt:index) value.
+    selectedMethods := (navigationState selectedMethodsArrayAt:index) value ? #().
     "/ filter those which are lost due to recompilation ...
     selectedMethods := selectedMethods select:[:m | m selector notNil].
 
@@ -54195,7 +54195,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.492 2002-11-22 13:44:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.493 2002-11-22 15:14:19 martin Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Fri Nov 22 14:44:00 2002 +0100
+++ b/Tools__NewSystemBrowser.st	Fri Nov 22 16:14:19 2002 +0100
@@ -12186,7 +12186,7 @@
      generator selectedMethods selectedMethod
      myGenerator myGeneratorsHome |
 
-    selectedMethods := (navigationState selectedMethodsArrayAt:index) value.
+    selectedMethods := (navigationState selectedMethodsArrayAt:index) value ? #().
     "/ filter those which are lost due to recompilation ...
     selectedMethods := selectedMethods select:[:m | m selector notNil].
 
@@ -54195,7 +54195,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.492 2002-11-22 13:44:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.493 2002-11-22 15:14:19 martin Exp $'
 ! !
 
 NewSystemBrowser initialize!