diff options
| author | jenglish <jenglish@flightlab.com> | 2008-12-11 18:13:08 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@flightlab.com> | 2008-12-11 18:13:08 (GMT) |
| commit | b23f1c5ccb5f2a971132b9348cfa8fbfd5829087 (patch) | |
| tree | 7d4298babc6ca0316cbf781038ced8ceb74d5eea /library/demos/ttkpane.tcl | |
| parent | d8ecde2c07db2bec3692edaf1c3b5dcfcaf467f9 (diff) | |
| download | tk-b23f1c5ccb5f2a971132b9348cfa8fbfd5829087.zip tk-b23f1c5ccb5f2a971132b9348cfa8fbfd5829087.tar.gz tk-b23f1c5ccb5f2a971132b9348cfa8fbfd5829087.tar.bz2 | |
library/demos/*.tcl: Omit contraindicated [package require Ttk].
Remove logic that switches [ttk::scrollbar]s to [tk::scrollbar]s
based on [tk windowingsystem]; this is already handled in
library/ttk/scrollbar.tcl.
Diffstat (limited to 'library/demos/ttkpane.tcl')
| -rw-r--r-- | library/demos/ttkpane.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/library/demos/ttkpane.tcl b/library/demos/ttkpane.tcl index a99a845..9664ad2 100644 --- a/library/demos/ttkpane.tcl +++ b/library/demos/ttkpane.tcl @@ -2,14 +2,13 @@ # # This demonstration script creates a Ttk pane with some content. # -# RCS: @(#) $Id: ttkpane.tcl,v 1.4 2008/06/24 13:37:32 patthoyts Exp $ +# RCS: @(#) $Id: ttkpane.tcl,v 1.5 2008/12/11 18:13:08 jenglish Exp $ if {![info exists widgetDemo]} { error "This script should be run from the \"widget\" demo." } package require Tk -package require Ttk set w .ttkpane catch {destroy $w} |