Tools_BrowserList.st
changeset 10884 29636e660994
parent 10835 9bb85dddf432
child 10956 b26cdc63b145
--- a/Tools_BrowserList.st	Fri Nov 18 18:59:43 2011 +0100
+++ b/Tools_BrowserList.st	Sat Nov 19 00:45:19 2011 +0100
@@ -1512,9 +1512,11 @@
          to click in the list to focus it (which may change 
          the selection)"
         (v := aView windowGroup pointerView) ~~ aView ifTrue:[
-            aView windowGroup focusView: v.
-            v sensor keyPress:key x:x y:y view:v.
-            ^self.
+            v notNil ifTrue:[
+                aView windowGroup focusView: v.
+                v sensor keyPress:key x:x y:y view:v.
+                ^self.
+            ].
         ].
 
         searchWindow isNil ifTrue:[
@@ -1757,5 +1759,5 @@
 !BrowserList class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.37 2011-10-18 19:43:54 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.38 2011-11-18 23:45:19 vrany Exp $'
 ! !