summaryrefslogtreecommitdiffstats
path: root/tests/wm.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/wm.test')
-rw-r--r--tests/wm.test10
1 files changed, 9 insertions, 1 deletions
diff --git a/tests/wm.test b/tests/wm.test
index 145ee3f..e9d2de5 100644
--- a/tests/wm.test
+++ b/tests/wm.test
@@ -7,7 +7,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: wm.test,v 1.20 2002/12/01 23:37:53 mdejong Exp $
+# RCS: @(#) $Id: wm.test,v 1.21 2003/01/28 20:39:19 jenglish Exp $
# This file tests window manager interactions that work across
# platforms. Window manager tests that only work on a specific
@@ -1635,6 +1635,14 @@ test wm-withdraw-3.1 {} {
lappend result [wm state .t] [winfo ismapped .t]
} {withdrawn 0 normal 1}
+test wm-deletion-epoch-1.1 {Deletion epoch on multiple displays} {altDisplay} {
+ # See Tk Bug #671330 "segfault when e.g. deiconifying destroyed window"
+ deleteWindows
+ set w [toplevel .t -screen $env(TK_ALT_DISPLAY)]
+ wm deiconify $w ;# this caches the WindowRep
+ destroy .t
+ list [catch {wm deiconify $w} msg] $msg
+} {1 {bad window path name ".t"}}
# FIXME: