--- a/ObjectView.st	Mon Nov 22 11:44:27 1999 +0100
+++ b/ObjectView.st	Tue Nov 23 22:21:03 1999 +0100
@@ -2871,7 +2871,7 @@
 unselect
     "unselect - hide selection; clear selection"
 
-    selection size notNil ifTrue:[
+    selection size ~~ 0 ifTrue:[
         self hideSelection.
         selection := nil.
         self changed:#selection.
@@ -3232,5 +3232,5 @@
 !ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.76 1999-11-19 14:35:01 ps Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.77 1999-11-23 21:21:03 cg Exp $'
 ! !