diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-05 07:23:17 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-05 07:23:17 (GMT) |
| commit | bdc95807199b5fb2ad244fbd2a595825cdee1fc1 (patch) | |
| tree | e18f2274df06f9ee7e6d70c2d58b244fba0192c1 /tests/image.test | |
| parent | 884c9570fffd13b20d87151fe979e3e09edd5ed8 (diff) | |
| download | tk-bdc95807199b5fb2ad244fbd2a595825cdee1fc1.zip tk-bdc95807199b5fb2ad244fbd2a595825cdee1fc1.tar.gz tk-bdc95807199b5fb2ad244fbd2a595825cdee1fc1.tar.bz2 | |
Use single-argument "expr" as much as possible. Not complete yet, but most trivial places are done.
Diffstat (limited to 'tests/image.test')
| -rw-r--r-- | tests/image.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/image.test b/tests/image.test index 861b086..5842ce3 100644 --- a/tests/image.test +++ b/tests/image.test @@ -47,7 +47,7 @@ test image-1.6 {Tk_ImageCmd procedure, "create" option} -constraints { scan [image create test] image%d first image create test myimage scan [image create test -variable x] image%d second - expr $second-$first + expr {$second-$first} } -cleanup { imageCleanup } -result {1} |