summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorstanton <stanton>1998-06-24 16:05:51 (GMT)
committerstanton <stanton>1998-06-24 16:05:51 (GMT)
commit651b2d1f0076dd7bc73647bfeaf5cf08481106ef (patch)
tree355a3fba1134635fd430cb0b22cd4abca280cefe
parent4a4091d8d3e7e8b3559d9b3b69f72b5c2020d520 (diff)
downloadtk-651b2d1f0076dd7bc73647bfeaf5cf08481106ef.zip
tk-651b2d1f0076dd7bc73647bfeaf5cf08481106ef.tar.gz
tk-651b2d1f0076dd7bc73647bfeaf5cf08481106ef.tar.bz2
added test for unusual initialdir
-rw-r--r--tests/filebox.test8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/filebox.test b/tests/filebox.test
index 6bae6c5..83f320c 100644
--- a/tests/filebox.test
+++ b/tests/filebox.test
@@ -198,6 +198,14 @@ foreach mode $modes {
-parent $parent -initialdir $fileDir]
} $pathName
+ test filebox-2.4 "$command command" {
+ ToPressButton $parent ok
+ set choice [$command -title "Enter \"$fileName\" and press Ok" \
+ -parent $parent -initialdir . \
+ -initialfile $fileName]
+ } $pathName
+
+
set filters(1) {}
set filters(2) {