--- a/UIObjectView.st	Wed Mar 31 18:27:20 1999 +0200
+++ b/UIObjectView.st	Thu Apr 01 15:30:20 1999 +0200
@@ -389,17 +389,17 @@
 enableStateChanged
     "set the modification / test mode
     "
-    |aState|
-
-    (aState := enableChannel value) ifFalse:[
-        aState ifFalse:[
-            saveSelection := self selection.
-            self select:nil.
+    self shown ifTrue:[
+        enableChannel value ifFalse:[
+            saveSelection := selection.
+            self hideSelection.
+            selection := nil.
             inputView unmap.
         ] ifTrue:[
             inputView raise.
             inputView realize.
-            self select:saveSelection.
+            selection := saveSelection.
+            self showSelection
         ]
     ]
 
@@ -436,7 +436,7 @@
 testMode:aBoolean
     "change test mode
     "
-    self enabled:(aBoolean not)
+    enableChannel value:(aBoolean not)
 ! !
 
 !UIObjectView methodsFor:'blocked'!