equal
deleted
inserted
replaced
11 " |
11 " |
12 |
12 |
13 "{ Package: 'stx:libview' }" |
13 "{ Package: 'stx:libview' }" |
14 |
14 |
15 Object subclass:#Controller |
15 Object subclass:#Controller |
16 instanceVariableNames:'model view sensor' |
16 instanceVariableNames:'model view' |
17 classVariableNames:'' |
17 classVariableNames:'' |
18 poolDictionaries:'' |
18 poolDictionaries:'' |
19 category:'Interface-Support-Controllers' |
19 category:'Interface-Support-Controllers' |
20 ! |
20 ! |
21 |
21 |
232 |
232 |
233 view:aView |
233 view:aView |
234 "set my view" |
234 "set my view" |
235 |
235 |
236 view := aView. |
236 view := aView. |
237 sensor := aView sensor. |
|
238 |
237 |
239 "Modified: 6.3.1997 / 15:31:48 / cg" |
238 "Modified: 6.3.1997 / 15:31:48 / cg" |
240 ! ! |
239 ! ! |
241 |
240 |
242 !Controller methodsFor:'event handling'! |
241 !Controller methodsFor:'event handling'! |
583 ! ! |
582 ! ! |
584 |
583 |
585 !Controller class methodsFor:'documentation'! |
584 !Controller class methodsFor:'documentation'! |
586 |
585 |
587 version |
586 version |
588 ^ '$Header: /cvs/stx/stx/libview/Controller.st,v 1.53 2003-07-01 18:20:45 cg Exp $' |
587 ^ '$Header: /cvs/stx/stx/libview/Controller.st,v 1.54 2004-08-19 12:05:27 stefan Exp $' |
589 ! ! |
588 ! ! |