diff options
-rw-r--r-- | tests/filebox.test | 8 |
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) { |