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)