diff options
| author | fvogel <fvogelnew1@free.fr> | 2016-10-30 18:04:10 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2016-10-30 18:04:10 (GMT) |
| commit | 89e46f7896c0f7c9cda89def1f3a6e745ca715de (patch) | |
| tree | 145a6c18ddd0dc909781f8401f536d645bd0bf79 /tests/filebox.test | |
| parent | a7a979e12eba8429a98d00aede54ff5a1b729375 (diff) | |
| parent | 3bbc7a3606807a480a7343dcb0e9962cb5a2c2a7 (diff) | |
| download | tk-89e46f7896c0f7c9cda89def1f3a6e745ca715de.zip tk-89e46f7896c0f7c9cda89def1f3a6e745ca715de.tar.gz tk-89e46f7896c0f7c9cda89def1f3a6e745ca715de.tar.bz2 | |
Fixed [3588460fff] - -typevariable buggy in X11
Diffstat (limited to 'tests/filebox.test')
| -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 37c06ef..85cb8a5 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-" } |