diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2003-02-19 16:13:07 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2003-02-19 16:13:07 (GMT) |
| commit | 0b3d6e92499461624a68d7dcaa92c145c38ab8a2 (patch) | |
| tree | d73d4c1fc94399e7790eb9664bff4aeaa166a040 /library/demos/widget | |
| parent | b4ace086b1f3c8ec8474277f27c09f783c15ddce (diff) | |
| download | tk-0b3d6e92499461624a68d7dcaa92c145c38ab8a2.zip tk-0b3d6e92499461624a68d7dcaa92c145c38ab8a2.tar.gz tk-0b3d6e92499461624a68d7dcaa92c145c38ab8a2.tar.bz2 | |
New part for the widget demo showing Tk's UNICODE output. [Patch #627453]
Diffstat (limited to 'library/demos/widget')
| -rw-r--r-- | library/demos/widget | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/library/demos/widget b/library/demos/widget index fde5c94..33c7843 100644 --- a/library/demos/widget +++ b/library/demos/widget @@ -11,7 +11,7 @@ exec wish "$0" "$@" # ".tcl" files is this directory, which are sourced by this script # as needed. # -# RCS: @(#) $Id: widget,v 1.8 2002/08/31 06:12:28 das Exp $ +# RCS: @(#) $Id: widget,v 1.9 2003/02/19 16:13:15 dkf Exp $ eval destroy [winfo child .] wm title . "Widget Demonstration" @@ -161,6 +161,7 @@ proc addDemoSection {title demos} { addDemoSection "Labels, buttons, checkbuttons, and radiobuttons" { label "Labels (text and bitmaps)" + unicodeout "Labels and UNICODE text" button "Buttons" check "Check-buttons (select any of a group)" radio "Radio-buttons (select one of a group)" |