OrderedCollectionInspectorView.st
changeset 29 8a72e10043f6
parent 23 3363884b8e9f
child 52 7b48409ae088
--- a/OrderedCollectionInspectorView.st	Thu Jul 14 15:13:22 1994 +0200
+++ b/OrderedCollectionInspectorView.st	Fri Aug 05 03:38:55 1994 +0200
@@ -1,3 +1,5 @@
+"{ Package: 'Programming Tools' }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -26,6 +28,8 @@
 
     workspace contents:nil.
     lineNr == 1 ifTrue:[
+        "selecting self also does a re-set, this allows updating the list"
+        self inspect:inspectedObject.
         val := inspectedObject
     ] ifFalse:[
         val := inspectedObject at:(lineNr - 1)