From 8f7a5e090555d59da1db17e4881ac68aee343859 Mon Sep 17 00:00:00 2001 From: mdejong Date: Sun, 9 Jun 2002 09:07:14 +0000 Subject: * library/bgerror.tcl (tk::dialog::error::bgerror): Don't set the bgerror dialog as a transient of itself since this operation is ill defined. --- ChangeLog | 6 ++++++ library/bgerror.tcl | 7 ++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 981e2f3..9909138 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2002-06-09 Mo DeJong + + * library/bgerror.tcl (tk::dialog::error::bgerror): + Don't set the bgerror dialog as a transient of + itself since this operation is ill defined. + 2002-06-06 Donal K. Fellows * win/tkWinCursor.c (TkGetCursorByName): Fixed so that the reading diff --git a/library/bgerror.tcl b/library/bgerror.tcl index a379e75..d9770ae 100644 --- a/library/bgerror.tcl +++ b/library/bgerror.tcl @@ -9,8 +9,8 @@ # Copyright (c) 1998-2000 by Ajuba Solutions. # All rights reserved. # -# RCS: @(#) $Id: bgerror.tcl,v 1.20 2002/05/08 05:13:03 dgp Exp $ -# $Id: bgerror.tcl,v 1.20 2002/05/08 05:13:03 dgp Exp $ +# RCS: @(#) $Id: bgerror.tcl,v 1.21 2002/06/09 09:07:14 mdejong Exp $ +# $Id: bgerror.tcl,v 1.21 2002/06/09 09:07:14 mdejong Exp $ namespace eval ::tk { namespace eval dialog { @@ -139,9 +139,6 @@ proc ::tk::dialog::error::bgerror err { wm iconname .bgerrorDialog ErrorDialog wm protocol .bgerrorDialog WM_DELETE_WINDOW { } - # The following, though surprising, works. - wm transient .bgerrorDialog .bgerrorDialog - if {$tcl_platform(platform) eq "macintosh"} { ::tk::unsupported::MacWindowStyle style .bgerrorDialog dBoxProc } -- cgit v0.12