# HG changeset patch
# User Rik <octave@nomad.inbox5.com>
# Date 1318129109 25200
# Node ID db15303ee267b9e389941cad7ddfe63d72e08e6c
# Parent  b68b354a39c2ad4067b5c63ae9f86a868a8c34a9
substr.m: Fix failing %!test for 0 length.

* substr.m: Fix failing %!test for 0 length.

diff -r b68b354a39c2 -r db15303ee267 scripts/strings/substr.m
--- a/scripts/strings/substr.m	Sat Oct 08 18:54:53 2011 -0700
+++ b/scripts/strings/substr.m	Sat Oct 08 19:58:29 2011 -0700
@@ -97,7 +97,7 @@
 %!assert (substr ("This is a test string", -11, 4), "test");
 %!assert (substr ("This is a test string", -11, -7), "test");
 %!assert (substr ("This is a test string", 1, -7), "This is a test");
-%!assert (substr ("This is a test string", 1, 0), "");
+%!assert (isempty (substr ("This is a test string", 1, 0)));
 
 %% Test input validation
 %!error substr ()