equal
deleted
inserted
replaced
32 |
32 |
33 TextView comment:' |
33 TextView comment:' |
34 COPYRIGHT (c) 1989 by Claus Gittinger |
34 COPYRIGHT (c) 1989 by Claus Gittinger |
35 All Rights Reserved |
35 All Rights Reserved |
36 |
36 |
37 $Header: /cvs/stx/stx/libwidg/TextView.st,v 1.16 1995-02-17 17:05:30 claus Exp $ |
37 $Header: /cvs/stx/stx/libwidg/TextView.st,v 1.17 1995-02-27 10:41:21 claus Exp $ |
38 '! |
38 '! |
39 |
39 |
40 !TextView class methodsFor:'documentation'! |
40 !TextView class methodsFor:'documentation'! |
41 |
41 |
42 copyright |
42 copyright |
53 " |
53 " |
54 ! |
54 ! |
55 |
55 |
56 version |
56 version |
57 " |
57 " |
58 $Header: /cvs/stx/stx/libwidg/TextView.st,v 1.16 1995-02-17 17:05:30 claus Exp $ |
58 $Header: /cvs/stx/stx/libwidg/TextView.st,v 1.17 1995-02-27 10:41:21 claus Exp $ |
59 " |
59 " |
60 ! |
60 ! |
61 |
61 |
62 documentation |
62 documentation |
63 " |
63 " |
201 ] ifFalse:[ |
201 ] ifFalse:[ |
202 selectionBgColor := fgColor |
202 selectionBgColor := fgColor |
203 ] |
203 ] |
204 ] |
204 ] |
205 ]. |
205 ]. |
206 ! |
|
207 |
|
208 initEvents |
|
209 super initEvents. |
|
210 self enableButtonEvents. |
|
211 self enableButtonMotionEvents |
|
212 ! |
206 ! |
213 |
207 |
214 initializeMiddleButtonMenu |
208 initializeMiddleButtonMenu |
215 |labels| |
209 |labels| |
216 |
210 |