diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2010-01-06 09:25:14 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2010-01-06 09:25:14 (GMT) |
commit | ad585186aa2726d02510006e5a619be5b4021fc5 (patch) | |
tree | ed4485d70c366f86cb8eeb1c8400c6a4ce5e7998 /tests/wm.test | |
parent | f33376cb218f06084bae0b06bbb386d8b99b3d2b (diff) | |
download | tk-ad585186aa2726d02510006e5a619be5b4021fc5.zip tk-ad585186aa2726d02510006e5a619be5b4021fc5.tar.gz tk-ad585186aa2726d02510006e5a619be5b4021fc5.tar.bz2 |
[Bug 1163496]: Allow windows to be set to be transients for withdrawn masters
correctly.
Diffstat (limited to 'tests/wm.test')
-rw-r--r-- | tests/wm.test | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/tests/wm.test b/tests/wm.test index f28eeab..1fd024f 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.46 2008/11/15 00:00:27 patthoyts Exp $ +# RCS: @(#) $Id: wm.test,v 1.47 2010/01/06 09:25:15 dkf Exp $ # This file tests window manager interactions that work across platforms. # Window manager tests that only work on a specific platform should be placed @@ -1893,6 +1893,23 @@ test wm-transient-7.5 {Reassign transient, destroy transient} -body { deleteWindows } +test wm-transient-8.1 {transient to withdrawn window, Bug 1163496} -setup { + deleteWindows + set result {} +} -body { + # Verifies that transients stay on top of their masters, even if they were + # made transients when those masters were withdrawn. + toplevel .t1; wm withdraw .t1; update + toplevel .t2; wm transient .t2 .t1; update + lappend result [winfo ismapped .t1] [winfo ismapped .t2] + wm deiconify .t1; update + lappend result [winfo ismapped .t1] [winfo ismapped .t2] + raise .t1; update + lappend result [lsearch -all -inline -glob [wm stackorder .] ".t?"] +} -cleanup { + deleteWindows +} -result {0 0 1 1 {.t1 .t2}} + ### wm state ### test wm-state-1.1 {usage} -returnCodes error -body { |