equal
deleted
inserted
replaced
672 |
672 |
673 "Created: / 06-04-2010 / 14:13:14 / Jakub <zelenja7@fel.cvut.cz>" |
673 "Created: / 06-04-2010 / 14:13:14 / Jakub <zelenja7@fel.cvut.cz>" |
674 "Modified: / 23-06-2010 / 17:01:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
674 "Modified: / 23-06-2010 / 17:01:47 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
675 ! ! |
675 ! ! |
676 |
676 |
677 !CodeView2 methodsFor:'accessing - code component'! |
677 !CodeView2 methodsFor:'accessing-code component'! |
678 |
678 |
679 klass |
679 klass |
680 |
680 |
681 | v | |
681 | v | |
682 |
682 |
1123 ^textView hasSelection |
1123 ^textView hasSelection |
1124 |
1124 |
1125 "Created: / 14-02-2010 / 09:53:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1125 "Created: / 14-02-2010 / 09:53:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1126 ! ! |
1126 ! ! |
1127 |
1127 |
1128 !CodeView2 methodsFor:'delegation - drawing'! |
1128 !CodeView2 methodsFor:'delegation-drawing'! |
1129 |
1129 |
1130 drawLine:lineNo in: view atX:x y:y width: w height:h from:startCol to:endColOrNil with:fg and:bg |
1130 drawLine:lineNo in: view atX:x y:y width: w height:h from:startCol to:endColOrNil with:fg and:bg |
1131 "See the comment in |
1131 "See the comment in |
1132 CodeViewService>>drawLine:in:atX..." |
1132 CodeViewService>>drawLine:in:atX..." |
1133 |
1133 |
1158 redrawVisibleLine:visLine from:startCol to:endCol |
1158 redrawVisibleLine:visLine from:startCol to:endCol |
1159 |
1159 |
1160 "Modified: / 07-03-2010 / 14:46:22 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1160 "Modified: / 07-03-2010 / 14:46:22 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1161 ! ! |
1161 ! ! |
1162 |
1162 |
1163 !CodeView2 methodsFor:'delegation - events'! |
1163 !CodeView2 methodsFor:'delegation-events'! |
1164 |
1164 |
1165 buttonMotion: button x:x y:y in: view |
1165 buttonMotion: button x:x y:y in: view |
1166 |
1166 |
1167 "Delegates events to services. Answers true iff at least |
1167 "Delegates events to services. Answers true iff at least |
1168 one service handler method returns true. In that case, |
1168 one service handler method returns true. In that case, |
2403 ^self reallyModifiedChannel value |
2403 ^self reallyModifiedChannel value |
2404 |
2404 |
2405 "Created: / 07-10-2011 / 19:28:11 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
2405 "Created: / 07-10-2011 / 19:28:11 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
2406 ! ! |
2406 ! ! |
2407 |
2407 |
2408 !CodeView2::TextView methodsFor:'accessing - colors'! |
2408 !CodeView2::TextView methodsFor:'accessing-colors'! |
2409 |
2409 |
2410 colorChanged |
2410 colorChanged |
2411 ^ Color redByte:240 greenByte: 192 blueByte: 192 |
2411 ^ Color redByte:240 greenByte: 192 blueByte: 192 |
2412 |
2412 |
2413 "Modified: / 24-06-2010 / 14:05:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
2413 "Modified: / 24-06-2010 / 14:05:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
2998 super accept. |
2998 super accept. |
2999 reallyModifiedChannel value: false. |
2999 reallyModifiedChannel value: false. |
3000 listOriginal := list copy. |
3000 listOriginal := list copy. |
3001 |
3001 |
3002 "Created: / 07-10-2011 / 19:36:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3002 "Created: / 07-10-2011 / 19:36:41 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
3003 ! |
|
3004 |
|
3005 canSearchVariable |
|
3006 "if there is a variable-highlight service" |
|
3007 |
|
3008 ^ codeView canSearchVariable |
|
3009 |
|
3010 "Created: / 08-03-2012 / 02:56:49 / cg" |
3003 ! |
3011 ! |
3004 |
3012 |
3005 cancel |
3013 cancel |
3006 |
3014 |
3007 self list: listOriginal |
3015 self list: listOriginal |
3268 ! ! |
3276 ! ! |
3269 |
3277 |
3270 !CodeView2 class methodsFor:'documentation'! |
3278 !CodeView2 class methodsFor:'documentation'! |
3271 |
3279 |
3272 version |
3280 version |
3273 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.53 2012-03-07 12:00:16 cg Exp $' |
3281 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.54 2012-03-08 02:48:16 cg Exp $' |
3274 ! |
3282 ! |
3275 |
3283 |
3276 version_CVS |
3284 version_CVS |
3277 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.53 2012-03-07 12:00:16 cg Exp $' |
3285 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.54 2012-03-08 02:48:16 cg Exp $' |
3278 ! |
3286 ! |
3279 |
3287 |
3280 version_SVN |
3288 version_SVN |
3281 ^ '§Id: Tools__CodeView2.st 7797 2011-06-28 07:45:06Z vranyj1 §' |
3289 ^ '§Id: Tools__CodeView2.st 7797 2011-06-28 07:45:06Z vranyj1 §' |
3282 ! ! |
3290 ! ! |