diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2007-04-20 13:39:04 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2007-04-20 13:39:04 (GMT) |
| commit | 20ca6a6072b7f40c6b849b681c7600e94901aa90 (patch) | |
| tree | e0c7123990bdbb67be73fa5badb1116321b9bef9 | |
| parent | 2e1d6b21db75a43a44e02272dce97955e9aecde1 (diff) | |
| download | tcl-20ca6a6072b7f40c6b849b681c7600e94901aa90.zip tcl-20ca6a6072b7f40c6b849b681c7600e94901aa90.tar.gz tcl-20ca6a6072b7f40c6b849b681c7600e94901aa90.tar.bz2 | |
Test constraints are automatically "and"ed together
| -rw-r--r-- | tests/registry.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/registry.test b/tests/registry.test index 742a8e5..a2329b2 100644 --- a/tests/registry.test +++ b/tests/registry.test @@ -10,7 +10,7 @@ # Copyright (c) 1997 by Sun Microsystems, Inc. All rights reserved. # Copyright (c) 1998-1999 by Scriptics Corporation. # -# RCS: @(#) $Id: registry.test,v 1.20 2007/03/17 22:31:41 kennykb Exp $ +# RCS: @(#) $Id: registry.test,v 1.21 2007/04/20 13:39:04 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2 @@ -250,7 +250,7 @@ test registry-4.8 {GetKeyNames: Unicode} {win reg nt} { set result } "baz\u30b7bar blat" test registry-4.9 {GetKeyNames: very long key [Bug 1682211]} {*}{ - -constraints {win && reg} + -constraints {win reg} -setup { registry set HKEY_CLASSES_ROOT\\TclFoobar\\a registry set HKEY_CLASSES_ROOT\\TclFoobar\\b[string repeat x 254] |