diff options
Diffstat (limited to 'tests/canvPs.test')
-rw-r--r-- | tests/canvPs.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/canvPs.test b/tests/canvPs.test index 74287d0..68c3b68 100644 --- a/tests/canvPs.test +++ b/tests/canvPs.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: canvPs.test,v 1.11 2005/10/12 09:29:21 dkf Exp $ +# RCS: @(#) $Id: canvPs.test,v 1.12 2006/03/14 05:01:48 dgp Exp $ package require tcltest 2.1 eval tcltest::configure $argv @@ -132,6 +132,8 @@ test canvPs-2.4 {test writing to channel and file, same output} -constraints { test canvPs-3.1 {test ps generation with an embedded window} -setup { set bar [makeFile {} bar.ps] file delete $bar +} -constraints { + notAqua } -body { destroy .c pack [canvas .c -width 200 -height 200 -background white] |