diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 22:00:15 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 22:00:15 (GMT) |
commit | 8acb512c92c1b619073eac7d604ab9791ef0e713 (patch) | |
tree | 3e9691c13e240731e5cf78e7e27ff536d68a4bab /library/demos/ctext.tcl | |
parent | 90b1090817bbf37d8787cc9ed77f2a4ca7460bb7 (diff) | |
parent | 2d8d71bb9e77b74a29295db7280e8383c4ac4df0 (diff) | |
download | tk-8acb512c92c1b619073eac7d604ab9791ef0e713.zip tk-8acb512c92c1b619073eac7d604ab9791ef0e713.tar.gz tk-8acb512c92c1b619073eac7d604ab9791ef0e713.tar.bz2 |
Merge trunk
Diffstat (limited to 'library/demos/ctext.tcl')
-rw-r--r-- | library/demos/ctext.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/demos/ctext.tcl b/library/demos/ctext.tcl index 4b8c644..a3b4e8a 100644 --- a/library/demos/ctext.tcl +++ b/library/demos/ctext.tcl @@ -40,7 +40,7 @@ $c create rectangle 245 195 255 205 -outline black -fill red # First, create the text item and give it bindings so it can be edited. -$c addtag text withtag [$c create text 250 200 -text "This is just a string of text to demonstrate the text facilities of canvas widgets. Bindings have been been defined to support editing (see above)." -width 440 -anchor n -font $textFont -justify left] +$c addtag text withtag [$c create text 250 200 -text "This is just a string of text to demonstrate the text facilities of canvas widgets. Bindings have been defined to support editing (see above)." -width 440 -anchor n -font $textFont -justify left] $c bind text <1> "textB1Press $c %x %y" $c bind text <B1-Motion> "textB1Move $c %x %y" $c bind text <Shift-1> "$c select adjust current @%x,%y" |