equal
deleted
inserted
replaced
63 ). |
63 ). |
64 ]. |
64 ]. |
65 items := items , #( |
65 items := items , #( |
66 ('-') |
66 ('-') |
67 ('Owners' showOwners ) |
67 ('Owners' showOwners ) |
68 ('Ref chains' showReferences ) |
68 ('Ref Chains' showReferences ) |
69 ('-') |
69 ('-') |
70 ('Browse' browse ) |
70 ('Browse' browse ) |
71 "/ ('Browse class hierarchy' browseClassHierarchy ) |
71 "/ ('Browse class hierarchy' browseClassHierarchy ) |
72 "/ ('Browse full class protocol' browseFullClassProtocol) |
72 "/ ('Browse full class protocol' browseFullClassProtocol) |
73 ). |
73 ). |
95 ) |
95 ) |
96 ]. |
96 ]. |
97 ]. |
97 ]. |
98 |
98 |
99 monitorProcess isNil ifTrue:[ |
99 monitorProcess isNil ifTrue:[ |
100 items := items , #( ('-') ('Start monitor' doStartMonitor)). |
100 items := items , #( ('-') ('Start Monitor' doStartMonitor)). |
101 ] ifFalse:[ |
101 ] ifFalse:[ |
102 items := items , #( ('-') ('Stop monitor' doStopMonitor)). |
102 items := items , #( ('-') ('Stop Monitor' doStopMonitor)). |
103 ]. |
103 ]. |
104 items := items , (self numberBaseItems). |
104 items := items , (self numberBaseItems). |
105 |
105 |
106 m := PopUpMenu |
106 m := PopUpMenu |
107 itemList:items |
107 itemList:items |
117 ]. |
117 ]. |
118 ]. |
118 ]. |
119 |
119 |
120 ^ m |
120 ^ m |
121 |
121 |
122 "Modified: / 13-06-2012 / 10:13:49 / cg" |
122 "Modified: / 06-08-2012 / 09:01:56 / cg" |
123 ! ! |
123 ! ! |
124 |
124 |
125 !OrderedCollectionInspectorView methodsFor:'private'! |
125 !OrderedCollectionInspectorView methodsFor:'private'! |
126 |
126 |
127 baseInspectedObjectClass |
127 baseInspectedObjectClass |
190 ! ! |
190 ! ! |
191 |
191 |
192 !OrderedCollectionInspectorView class methodsFor:'documentation'! |
192 !OrderedCollectionInspectorView class methodsFor:'documentation'! |
193 |
193 |
194 version |
194 version |
195 ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.47 2012-06-13 08:15:03 cg Exp $' |
195 ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.48 2012-08-06 07:02:02 cg Exp $' |
196 ! |
196 ! |
197 |
197 |
198 version_CVS |
198 version_CVS |
199 ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.47 2012-06-13 08:15:03 cg Exp $' |
199 ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.48 2012-08-06 07:02:02 cg Exp $' |
200 ! ! |
200 ! ! |