From a0bcf50401b6824925838b8ce781d72ba993caf9 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Wed, 31 Oct 2007 16:17:57 +0000
Subject: D'uh, now make the code more idiomatic!

---
 library/demos/widget | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/library/demos/widget b/library/demos/widget
index af016a2..67dc893 100644
--- a/library/demos/widget
+++ b/library/demos/widget
@@ -10,7 +10,7 @@ exec wish "$0" "$@"
 # separate ".tcl" files is this directory, which are sourced by this script as
 # needed.
 #
-# RCS: @(#) $Id: widget,v 1.42 2007/10/31 16:17:06 dkf Exp $
+# RCS: @(#) $Id: widget,v 1.43 2007/10/31 16:17:57 dkf Exp $
 
 package require Tcl	8.5
 package require Tk	8.5
@@ -714,7 +714,7 @@ proc PrintTextWin32 {filename} {
 #
 proc aboutBox {} {
     tk_messageBox -icon info -type ok -title [mc "About Widget Demo"] \
-	    -message "[mc {Tk widget demonstration application}]" -detail \
+	    -message [mc "Tk widget demonstration application"] -detail \
 "[mc {Copyright (c) %s} {1996-1997 Sun Microsystems, Inc.}]
 [mc {Copyright (c) %s} {1997-2000 Ajuba Solutions, Inc.}]
 [mc {Copyright (c) %s} {2001-2007 Donal K. Fellows}]
-- 
cgit v0.12