diff options
| author | fvogel <fvogelnew1@free.fr> | 2016-10-30 18:03:42 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2016-10-30 18:03:42 (GMT) |
| commit | 3bbc7a3606807a480a7343dcb0e9962cb5a2c2a7 (patch) | |
| tree | d8e3fcf0e54904098a69830a8b0f01ae98d12eba /tests | |
| parent | 3018168a3e0557e975297dc25d9906c6c201b0ed (diff) | |
| parent | fa9df7b1d04b12846e08d6bd9c0961629f30e222 (diff) | |
| download | tk-3bbc7a3606807a480a7343dcb0e9962cb5a2c2a7.zip tk-3bbc7a3606807a480a7343dcb0e9962cb5a2c2a7.tar.gz tk-3bbc7a3606807a480a7343dcb0e9962cb5a2c2a7.tar.bz2 | |
Fixed [3588460fff] - -typevariable buggy in X11
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/filebox.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/filebox.test b/tests/filebox.test index 2573825..2f87c3e 100644 --- a/tests/filebox.test +++ b/tests/filebox.test @@ -281,7 +281,7 @@ foreach mode $modes { -initialfile $fileName -initialdir $fileDir \ -typevariable tv] if {[info exists tv]} { - regexp {^(.*) \(.*\)$} $tv dummy typeName + set typeName $tv } else { set typeName "-unset-" } |