summaryrefslogtreecommitdiffstats
path: root/library/dialog.tcl
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2001-08-06 18:29:41 (GMT)
committerdgp <dgp@users.sourceforge.net>2001-08-06 18:29:41 (GMT)
commit0ecd54f69712f24aebc4c2f5327731a88b007531 (patch)
treefa98226795efcc73911ec0bd548c0a6f13abdf8e /library/dialog.tcl
parent30e0d397055894b4fa0053664ff28617a243dca3 (diff)
downloadtk-0ecd54f69712f24aebc4c2f5327731a88b007531.zip
tk-0ecd54f69712f24aebc4c2f5327731a88b007531.tar.gz
tk-0ecd54f69712f24aebc4c2f5327731a88b007531.tar.bz2
* TIP 44 changes specific to the Mac and
Windows platforms that were overlooked before: tkOpenDocument, tkConsoleExit, tkConsoleOutput, unsupported1 out of namespace :: . Thanks to Vince Darley for prompting another look.
Diffstat (limited to 'library/dialog.tcl')
-rw-r--r--library/dialog.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/dialog.tcl b/library/dialog.tcl
index 534a9ae..a6f3c5b 100644
--- a/library/dialog.tcl
+++ b/library/dialog.tcl
@@ -3,7 +3,7 @@
# This file defines the procedure tk_dialog, which creates a dialog
# box containing a bitmap, a message, and one or more buttons.
#
-# RCS: @(#) $Id: dialog.tcl,v 1.9 2001/08/01 16:21:11 dgp Exp $
+# RCS: @(#) $Id: dialog.tcl,v 1.10 2001/08/06 18:29:41 dgp Exp $
#
# Copyright (c) 1992-1993 The Regents of the University of California.
# Copyright (c) 1994-1997 Sun Microsystems, Inc.
@@ -66,7 +66,7 @@ proc ::tk_dialog {w title text bitmap default args} {
}
if {[string equal $tcl_platform(platform) "macintosh"]} {
- unsupported1 style $w dBoxProc
+ ::tk::unsupported::MacWindowStyle style $w dBoxProc
}
frame $w.bot