summaryrefslogtreecommitdiffstats
path: root/library/demos
diff options
context:
space:
mode:
Diffstat (limited to 'library/demos')
-rw-r--r--library/demos/menu.tcl3
1 files changed, 1 insertions, 2 deletions
diff --git a/library/demos/menu.tcl b/library/demos/menu.tcl
index 3eb3c44..4464e9e 100644
--- a/library/demos/menu.tcl
+++ b/library/demos/menu.tcl
@@ -3,7 +3,7 @@
# This demonstration script creates a window with a bunch of menus
# and cascaded menus using menubars.
#
-# RCS: @(#) $Id: menu.tcl,v 1.4.2.1 2005/01/18 11:51:04 dkf Exp $
+# RCS: @(#) $Id: menu.tcl,v 1.4.2.2 2005/06/25 03:41:39 das Exp $
if {![info exists widgetDemo]} {
error "This script should be run from the \"widget\" demo."
@@ -140,7 +140,6 @@ $m entryconfigure "Does almost nothing" -bitmap questhead -compound left \
"The menu entry you invoked displays both a bitmap and a\
text string. Other than this, it is just like any other\
menu entry." {} 0 OK ]
-}
set m $w.menu.colors
$w.menu add cascade -label "Colors" -menu $m -underline 1