diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2003-09-30 14:54:29 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2003-09-30 14:54:29 (GMT) |
commit | 89cb52358e92bd6496cf8068147b904a689dd870 (patch) | |
tree | e0a362b7a1e36df8ae583f336d3235ec1b5e6688 /library/demos/widget | |
parent | aba06731f7bcc8bfdbee568d70e1fd8611f6dce4 (diff) | |
download | tk-89cb52358e92bd6496cf8068147b904a689dd870.zip tk-89cb52358e92bd6496cf8068147b904a689dd870.tar.gz tk-89cb52358e92bd6496cf8068147b904a689dd870.tar.bz2 |
Added [package require] to demos. [FRQ 815118]
Diffstat (limited to 'library/demos/widget')
-rw-r--r-- | library/demos/widget | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/library/demos/widget b/library/demos/widget index ae32937..0b538f3 100644 --- a/library/demos/widget +++ b/library/demos/widget @@ -11,10 +11,13 @@ exec wish "$0" "$@" # ".tcl" files is this directory, which are sourced by this script # as needed. # -# RCS: @(#) $Id: widget,v 1.16 2003/09/25 05:37:00 das Exp $ +# RCS: @(#) $Id: widget,v 1.17 2003/09/30 14:54:30 dkf Exp $ -eval destroy [winfo child .] +package require Tcl 8.4 +package require Tk 8.4 package require msgcat + +eval destroy [winfo child .] ::msgcat::mcload [file join $tk_library demos] namespace import ::msgcat::mc wm title . [mc "Widget Demonstration"] |