diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2003-02-19 16:13:07 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2003-02-19 16:13:07 (GMT) |
| commit | 4fd313e742e218136cc0dea0652f4b4ca4c41909 (patch) | |
| tree | d73d4c1fc94399e7790eb9664bff4aeaa166a040 /library/demos/widget | |
| parent | 3e852eda5c39f12079d59b6e032658130d613af2 (diff) | |
| download | tk-4fd313e742e218136cc0dea0652f4b4ca4c41909.zip tk-4fd313e742e218136cc0dea0652f4b4ca4c41909.tar.gz tk-4fd313e742e218136cc0dea0652f4b4ca4c41909.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)" |