diff options
author | mdejong <mdejong@noemail.net> | 2002-06-24 02:17:57 (GMT) |
---|---|---|
committer | mdejong <mdejong@noemail.net> | 2002-06-24 02:17:57 (GMT) |
commit | 16274c855bb0b2965bdedc06ab52bfe5177d8293 (patch) | |
tree | edbc5e0880c2a9fa6c82684e50af26e54f9b776b | |
parent | 008dee13bcc18621132480ed7a8ef45dcda0a89f (diff) | |
download | tk-16274c855bb0b2965bdedc06ab52bfe5177d8293.zip tk-16274c855bb0b2965bdedc06ab52bfe5177d8293.tar.gz tk-16274c855bb0b2965bdedc06ab52bfe5177d8293.tar.bz2 |
* tests/wm.test: Remove invalid minsize test. Add update
calls to wm transient tests so that idle handlers get
run. This is needed to get the tests to pass under Win32.
* unix/tkUnixWm.c (WmWaitMapProc): Move the special
transient withdrawn check into the if body to
make it easier to set a breakpoint on this test
inside a debugger. No functional changes.
* win/tkWinWm.c (WmWaitVisibilityOrMapProc): Ditto.
FossilOrigin-Name: 033a5a14b699169c2ef9e9277c3b97bbfac41cd4
-rw-r--r-- | ChangeLog | 11 | ||||
-rw-r--r-- | tests/wm.test | 16 | ||||
-rw-r--r-- | unix/tkUnixWm.c | 8 | ||||
-rw-r--r-- | win/tkWinWm.c | 8 |
4 files changed, 28 insertions, 15 deletions
@@ -1,3 +1,14 @@ +2002-06-22 Mo DeJong <mdejong@users.sourceforge.net> + + * tests/wm.test: Remove invalid minsize test. Add update + calls to wm transient tests so that idle handlers get + run. This is needed to get the tests to pass under Win32. + * unix/tkUnixWm.c (WmWaitMapProc): Move the special + transient withdrawn check into the if body to + make it easier to set a breakpoint on this test + inside a debugger. No functional changes. + * win/tkWinWm.c (WmWaitVisibilityOrMapProc): Ditto. + 2002-06-22 Jeff Hobbs <jeffh@ActiveState.com> * doc/wm.n: TIP #95 Windows implementation and diff --git a/tests/wm.test b/tests/wm.test index c7dceed..d859fa6 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.11 2002/06/22 01:43:47 mdejong Exp $ +# RCS: @(#) $Id: wm.test,v 1.12 2002/06/24 02:17:57 mdejong Exp $ # This file tests window manager interactions that work across # platforms. Window manager tests that only work on a specific @@ -519,6 +519,8 @@ test wm-transient-6.1 { a withdrawn transient does not track wm withdraw .subject wm withdraw .master wm deiconify .master + # idle handler should not map the transient + update wm state .subject } {withdrawn} @@ -533,12 +535,16 @@ test wm-transient-6.2 { a withdrawn transient does not track wm withdraw .subject wm withdraw .master wm deiconify .master + # idle handler should not map the transient + update lappend results [wm state .subject] wm deiconify .subject lappend results [wm state .subject] wm withdraw .master lappend results [wm state .subject] wm deiconify .master + # idle handler should map transient + update lappend results [wm state .subject] } {withdrawn normal withdrawn normal} @@ -725,18 +731,14 @@ test wm-minsize-1.3 {usage} { } {1 {wrong # arguments: must be "wm minsize window ?width height?"}} test wm-minsize-1.4 {usage} { - wm minsize .t -} {1 1} - -test wm-minsize-1.5 {usage} { list [catch {wm minsize . x 100} msg] $msg } {1 {expected integer but got "x"}} -test wm-minsize-1.6 {usage} { +test wm-minsize-1.5 {usage} { list [catch {wm minsize . 100 bogus} msg] $msg } {1 {expected integer but got "bogus"}} -test wm-minsize-1.7 {usage} { +test wm-minsize-1.6 {usage} { wm minsize .t 200 150 wm minsize .t } {200 150} diff --git a/unix/tkUnixWm.c b/unix/tkUnixWm.c index cfc1d1c..0de4103 100644 --- a/unix/tkUnixWm.c +++ b/unix/tkUnixWm.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixWm.c,v 1.25 2002/06/22 10:13:26 hobbs Exp $ + * RCS: @(#) $Id: tkUnixWm.c,v 1.26 2002/06/24 02:17:57 mdejong Exp $ */ #include "tkPort.h" @@ -2211,9 +2211,9 @@ WmWaitMapProc(clientData, eventPtr) if (masterPtr == NULL) return; - if (eventPtr->type == MapNotify && - !(winPtr->wmInfoPtr->flags & WM_TRANSIENT_WITHDRAWN)) { - (void) TkpWmSetState(winPtr, NormalState); + if (eventPtr->type == MapNotify) { + if (!(winPtr->wmInfoPtr->flags & WM_TRANSIENT_WITHDRAWN)) + (void) TkpWmSetState(winPtr, NormalState); } else if (eventPtr->type == UnmapNotify) { (void) TkpWmSetState(winPtr, WithdrawnState); } diff --git a/win/tkWinWm.c b/win/tkWinWm.c index 5532c6e..376a42b 100644 --- a/win/tkWinWm.c +++ b/win/tkWinWm.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinWm.c,v 1.43 2002/06/22 10:13:26 hobbs Exp $ + * RCS: @(#) $Id: tkWinWm.c,v 1.44 2002/06/24 02:17:57 mdejong Exp $ */ #include "tkWinInt.h" @@ -3512,9 +3512,9 @@ WmWaitVisibilityOrMapProc(clientData, eventPtr) if (masterPtr == NULL) return; - if (eventPtr->type == MapNotify && - !(winPtr->wmInfoPtr->flags & WM_TRANSIENT_WITHDRAWN)) { - TkpWmSetState(winPtr, NormalState); + if (eventPtr->type == MapNotify) { + if (!(winPtr->wmInfoPtr->flags & WM_TRANSIENT_WITHDRAWN)) + TkpWmSetState(winPtr, NormalState); } else if (eventPtr->type == UnmapNotify) { TkpWmSetState(winPtr, WithdrawnState); } |