summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--tests/filebox.test6
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/filebox.test b/tests/filebox.test
index 2573825..41382a2 100644
--- a/tests/filebox.test
+++ b/tests/filebox.test
@@ -281,7 +281,11 @@ foreach mode $modes {
-initialfile $fileName -initialdir $fileDir \
-typevariable tv]
if {[info exists tv]} {
- regexp {^(.*) \(.*\)$} $tv dummy typeName
+ if {$mode == 0} {
+ set typeName $tv
+ } else {
+ regexp {^(.*) \(.*\)$} $tv dummy typeName
+ }
} else {
set typeName "-unset-"
}