diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-14 13:31:25 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-14 13:31:25 (GMT) |
commit | 6669e94c070680392a0e8c77203e45084d9c09d0 (patch) | |
tree | 4374617eea84da0b0c281f7df9d54a9ca69eb029 /tests/event.test | |
parent | 88c76da7f7b34507aafaf94a6329fb943f881029 (diff) | |
download | tk-6669e94c070680392a0e8c77203e45084d9c09d0.zip tk-6669e94c070680392a0e8c77203e45084d9c09d0.tar.gz tk-6669e94c070680392a0e8c77203e45084d9c09d0.tar.bz2 |
Excess spacing in test-suite
Diffstat (limited to 'tests/event.test')
-rw-r--r-- | tests/event.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/event.test b/tests/event.test index 756dbe5..1691868 100644 --- a/tests/event.test +++ b/tests/event.test @@ -357,7 +357,7 @@ test event-3.1(click-drag) {click and drag in a text widget, this tests # Save the position of the insert cursor lappend result [$e index insert] - + # Now drag until selend is highlighted, then click up set current $anchor @@ -424,7 +424,7 @@ test event-3.1(click-drag) {click and drag in a text widget, this tests # Save the position of the insert cursor lappend result [$e index insert] - + # Now drag until selend is highlighted, then click up set current $anchor @@ -610,7 +610,7 @@ test event-4.2(double-click-drag) {click down, click up, click down again, deleteWindows } -result {select 11 7 select 4 { select} {Word select} 2} -test event-5.1(triple-click-drag) {Triple click and drag across lines in a +test event-5.1(triple-click-drag) {Triple click and drag across lines in a text widget, this should extend the selection to the new line} -setup { deleteWindows } -body { @@ -795,7 +795,7 @@ test event-7.2(double-click) {A double click on a lone character set result [list] lappend result [$e index insert] lappend result [_get_selection $e] - + # Clear selection by clicking at 0,0 event generate $e <ButtonPress-1> -x 0 -y 0 |