summaryrefslogtreecommitdiffstats
path: root/library/demos/ttkmenu.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'library/demos/ttkmenu.tcl')
-rw-r--r--library/demos/ttkmenu.tcl3
1 files changed, 2 insertions, 1 deletions
diff --git a/library/demos/ttkmenu.tcl b/library/demos/ttkmenu.tcl
index 6cda290..b0a42ee 100644
--- a/library/demos/ttkmenu.tcl
+++ b/library/demos/ttkmenu.tcl
@@ -3,7 +3,7 @@
# This demonstration script creates a toplevel window containing several Ttk
# menubutton widgets.
#
-# RCS: @(#) $Id: ttkmenu.tcl,v 1.1 2007/10/18 14:34:06 dkf Exp $
+# RCS: @(#) $Id: ttkmenu.tcl,v 1.2 2007/10/21 14:51:47 das Exp $
if {![info exists widgetDemo]} {
error "This script should be run from the \"widget\" demo."
@@ -47,6 +47,7 @@ foreach theme [ttk::themes] {
}
pack [ttk::frame $w.f] -fill x
+pack [ttk::frame $w.f1] -fill both -expand yes
lower $w.f
grid anchor $w.f center