equal
deleted
inserted
replaced
92 |
92 |
93 v := HVScrollableView for:SelectionInListView miniScrollerH:true in:self. |
93 v := HVScrollableView for:SelectionInListView miniScrollerH:true in:self. |
94 v origin:0.0@0.0 corner:1.0@1.0. |
94 v origin:0.0@0.0 corner:1.0@1.0. |
95 |
95 |
96 listView := v scrolledView. |
96 listView := v scrolledView. |
97 listView font:font. |
97 listView font:(EditTextView defaultFont). |
98 listView menuHolder:self; menuPerformer:self; menuMessage:#statusMenu. |
98 listView menuHolder:self; menuPerformer:self; menuMessage:#statusMenu. |
99 |
99 |
100 listView multipleSelectOk:true. |
100 listView multipleSelectOk:true. |
101 listView delegate:(KeyboardForwarder toView:self). |
101 listView delegate:(KeyboardForwarder toView:self). |
102 listView doubleClickAction:[:line | self doubleClicked]. |
102 listView doubleClickAction:[:line | self doubleClicked]. |
113 |
113 |
114 " |
114 " |
115 ProcessMonitor open |
115 ProcessMonitor open |
116 " |
116 " |
117 |
117 |
118 "Modified: 23.1.1997 / 03:21:14 / cg" |
118 "Modified: 4.8.1997 / 01:44:47 / cg" |
119 ! |
119 ! |
120 |
120 |
121 mapped |
121 mapped |
122 super mapped. |
122 super mapped. |
123 self updateStatus. |
123 self updateStatus. |
204 ! ! |
204 ! ! |
205 |
205 |
206 !SystemStatusMonitor class methodsFor:'documentation'! |
206 !SystemStatusMonitor class methodsFor:'documentation'! |
207 |
207 |
208 version |
208 version |
209 ^ '$Header: /cvs/stx/stx/libtool/SystemStatusMonitor.st,v 1.4 1997-03-02 10:23:46 cg Exp $' |
209 ^ '$Header: /cvs/stx/stx/libtool/SystemStatusMonitor.st,v 1.5 1997-08-05 14:30:01 cg Exp $' |
210 ! ! |
210 ! ! |