diff options
author | fvogel <fvogelnew1@free.fr> | 2018-04-30 18:14:58 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2018-04-30 18:14:58 (GMT) |
commit | 43554a166d2b5898c73c75bec90c6ea9d9162434 (patch) | |
tree | ce59e8f0d84fb2c4cc76526b56c51412f4fdf639 /tests/choosedir.test | |
parent | e8315eeabd717297bcff5144bb93b82c411c4a32 (diff) | |
download | tk-43554a166d2b5898c73c75bec90c6ea9d9162434.zip tk-43554a166d2b5898c73c75bec90c6ea9d9162434.tar.gz tk-43554a166d2b5898c73c75bec90c6ea9d9162434.tar.bz2 |
Some tests in choosedir.test (those that check the options parsing) can be run on all platforms, therefore remove the unnecessary constraints
Diffstat (limited to 'tests/choosedir.test')
-rw-r--r-- | tests/choosedir.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/choosedir.test b/tests/choosedir.test index 8675e10..379745e 100644 --- a/tests/choosedir.test +++ b/tests/choosedir.test @@ -85,25 +85,25 @@ set fake [file join $dir non-existant] set parent . -test choosedir-1.1 {tk_chooseDirectory command} -constraints unix -body { +test choosedir-1.1 {tk_chooseDirectory command} -body { tk_chooseDirectory -initialdir } -returnCodes error -result {value for "-initialdir" missing} -test choosedir-1.2 {tk_chooseDirectory command} -constraints unix -body { +test choosedir-1.2 {tk_chooseDirectory command} -body { tk_chooseDirectory -mustexist } -returnCodes error -result {value for "-mustexist" missing} -test choosedir-1.3 {tk_chooseDirectory command} -constraints unix -body { +test choosedir-1.3 {tk_chooseDirectory command} -body { tk_chooseDirectory -parent } -returnCodes error -result {value for "-parent" missing} -test choosedir-1.4 {tk_chooseDirectory command} -constraints unix -body { +test choosedir-1.4 {tk_chooseDirectory command} -body { tk_chooseDirectory -title } -returnCodes error -result {value for "-title" missing} -test choosedir-1.5.1 {tk_chooseDirectory command} -constraints {unix notAqua} -body { +test choosedir-1.5.1 {tk_chooseDirectory command} -constraints notAqua -body { tk_chooseDirectory -foo bar } -returnCodes error -result {bad option "-foo": must be -initialdir, -mustexist, -parent, or -title} test choosedir-1.5.2 {tk_chooseDirectory command} -constraints aqua -body { tk_chooseDirectory -foo bar } -returnCodes error -result {bad option "-foo": -initialdir, -message, -mustexist, -parent, -title, or -command} -test choosedir-1.6 {tk_chooseDirectory command} -constraints unix -body { +test choosedir-1.6 {tk_chooseDirectory command} -body { tk_chooseDirectory -parent foo.bar } -returnCodes error -result {bad window path name "foo.bar"} |