diff options
| author | gahr <gahr@gahr.ch> | 2016-04-04 11:25:12 (GMT) |
|---|---|---|
| committer | gahr <gahr@gahr.ch> | 2016-04-04 11:25:12 (GMT) |
| commit | 540521771129cfb3a851405ae4306448fea3e769 (patch) | |
| tree | 75feaeff0a9a36b53252789c8aebb45dbc0b2e49 /tests/apply.test | |
| parent | 4b301d844892c52ec5fecce47f03c91a551639ca (diff) | |
| parent | b4d78562f6e023b1bf1accc8649c1a93b14be8d6 (diff) | |
| download | tcl-540521771129cfb3a851405ae4306448fea3e769.zip tcl-540521771129cfb3a851405ae4306448fea3e769.tar.gz tcl-540521771129cfb3a851405ae4306448fea3e769.tar.bz2 | |
merge trunktip_444
Diffstat (limited to 'tests/apply.test')
| -rw-r--r-- | tests/apply.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/apply.test b/tests/apply.test index ba19b81..597cd97 100644 --- a/tests/apply.test +++ b/tests/apply.test @@ -228,7 +228,7 @@ test apply-8.3 {args treatment} { apply [list {x args} $applyBody] 1 2 3 } {{x 1} {args {2 3}}} test apply-8.4 {default values} { - apply [list {{x 1} {y 2}} $applyBody] + apply [list {{x 1} {y 2}} $applyBody] } {{x 1} {y 2}} test apply-8.5 {default values} { apply [list {{x 1} {y 2}} $applyBody] 3 4 |