aboutsummaryrefslogtreecommitdiff
path: root/demos/textInput.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'demos/textInput.tcl')
-rw-r--r--demos/textInput.tcl9
1 files changed, 6 insertions, 3 deletions
diff --git a/demos/textInput.tcl b/demos/textInput.tcl
index e36dd6b..3de2821 100644
--- a/demos/textInput.tcl
+++ b/demos/textInput.tcl
@@ -8,7 +8,7 @@ if {![info exists zincDemo]} {
#
# We need the text input support
-package require ZincText
+package require zincText
set w .textInput
@@ -35,7 +35,10 @@ pack $w.buttons.dismiss $w.buttons.code -side left -expand 1
text $w.text -relief sunken -borderwidth 2 -height 5
pack $w.text -expand yes -fill both
-$w.text insert end {This toy-appli demonstrates the use of the Tk::ZincText module. This module is designed for facilitating text input a la emacs on text items or on fields of items such as tracks, waypoints or tabulars.}
+$w.text insert end {This demo demonstrates the use of the zincText package.
+This module is designed for facilitating text input.
+It works on text items or on fields of items such as
+tracks, waypoints or tabulars.}
###########################################
@@ -45,7 +48,7 @@ zinc $w.zinc -width 500 -height 300 -font 10x20 -borderwidth 0
pack $w.zinc
#
-# Activate text input support from ZincText
+# Activate text input support from zincText
zn_TextBindings $w.zinc
### creating a tabular with 3 fields 2 of them being editable