equal
deleted
inserted
replaced
21 |
21 |
22 InspectorView comment:' |
22 InspectorView comment:' |
23 COPYRIGHT (c) 1989 by Claus Gittinger |
23 COPYRIGHT (c) 1989 by Claus Gittinger |
24 All Rights Reserved |
24 All Rights Reserved |
25 |
25 |
26 $Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.18 1995-03-09 03:31:14 claus Exp $ |
26 $Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.19 1995-03-09 10:59:29 claus Exp $ |
27 '! |
27 '! |
28 |
28 |
29 !InspectorView class methodsFor:'documentation'! |
29 !InspectorView class methodsFor:'documentation'! |
30 |
30 |
31 copyright |
31 copyright |
42 " |
42 " |
43 ! |
43 ! |
44 |
44 |
45 version |
45 version |
46 " |
46 " |
47 $Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.18 1995-03-09 03:31:14 claus Exp $ |
47 $Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.19 1995-03-09 10:59:29 claus Exp $ |
48 " |
48 " |
49 ! |
49 ! |
50 |
50 |
51 documentation |
51 documentation |
52 " |
52 " |
155 aList add:' ... ' |
155 aList add:' ... ' |
156 ]. |
156 ]. |
157 |
157 |
158 sameObject ifTrue:[ |
158 sameObject ifTrue:[ |
159 listView setContents:aList. |
159 listView setContents:aList. |
160 listView selection:1. |
160 "/ listView selection:1. |
161 ] ifFalse:[ |
161 ] ifFalse:[ |
162 listView contents:aList |
162 listView contents:aList |
163 ]. |
163 ]. |
164 |
164 |
165 workspace contents:nil. |
165 workspace contents:nil. |