diff options
| author | dgp <dgp@users.sourceforge.net> | 2001-08-01 16:21:11 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2001-08-01 16:21:11 (GMT) |
| commit | 98ea3cb2214b51432f38f6ea50c1c429397281cc (patch) | |
| tree | 38846cbe94cc8aac068898282ced4624f130770e /tests/text.test | |
| parent | 7e9aececf720b6f0e20157366f8e977ad2378ddd (diff) | |
| download | tk-98ea3cb2214b51432f38f6ea50c1c429397281cc.zip tk-98ea3cb2214b51432f38f6ea50c1c429397281cc.tar.gz tk-98ea3cb2214b51432f38f6ea50c1c429397281cc.tar.bz2 | |
Merged changes from feature branch dgp-privates-into-namespace,
implementing TIP 44. All Tk commands and variables matching
tk[A-Z]* are now in the ::tk namespace.
Diffstat (limited to 'tests/text.test')
| -rw-r--r-- | tests/text.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/text.test b/tests/text.test index 5e676dd..94ba999 100644 --- a/tests/text.test +++ b/tests/text.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: text.test,v 1.12 2000/07/25 00:05:40 ericm Exp $ +# RCS: @(#) $Id: text.test,v 1.13 2001/08/01 16:21:12 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { source [file join [pwd] [file dirname [info script]] defs.tcl] @@ -964,7 +964,7 @@ test text-20.35 {TextSearchCmd procedure, firstChar and lastChar} { test text-20.36 {TextSearchCmd procedure, regexp finds empty lines} { # Test for fix of bug #1643 .t insert end "\n" - tkTextSetCursor .t 4.0 + tk::TextSetCursor .t 4.0 .t search -forward -regexp {^$} insert end } {4.0} @@ -1362,7 +1362,7 @@ test text-24.1 {bug fix - 1642} { .t insert end "line 3\n" .t insert end "line 4\n" .t insert end "line 5\n" - tkTextSetCursor .t 3.0 + tk::TextSetCursor .t 3.0 .t search -backward -regexp "\$" insert 1.0 } {2.6} |