diff options
| -rw-r--r-- | tests/lreplace.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/lreplace.test b/tests/lreplace.test index 392e84d..7377869 100644 --- a/tests/lreplace.test +++ b/tests/lreplace.test @@ -104,6 +104,9 @@ test lreplace-1.27 {lreplace command} -body { test lreplace-1.28 {lreplace command} -body { lreplace x 1 1 y } -returnCodes 1 -result {list doesn't contain element 1} +test lreplace-1.29 {lreplace command} -body { + lreplace x 1 1 [error foo] +} -returnCodes 1 -result {foo} test lreplace-2.1 {lreplace errors} { list [catch lreplace msg] $msg |