# HG changeset patch
# User jwe
# Date 1127510357 0
# Node ID 3e4564ddd985eccd9e1552b651f8100127bfe7eb
# Parent  e2f85b298a7423fa52ec5a37bc49161aec380d8c
[project @ 2005-09-23 21:19:17 by jwe]

diff --git a/scripts/strings/split.m b/scripts/strings/split.m
--- a/scripts/strings/split.m
+++ b/scripts/strings/split.m
@@ -74,7 +74,7 @@
 	m = s;
 	return;
       elseif (n - 1 < length(ind))
-	ind = ind(1:n-1)
+	ind = ind(1:n-1);
       endif
       ind2 = [1, ind+l_t];
       ind  = [ind, l_s+1];
diff --git a/test/octave.test/string/split-3.m b/test/octave.test/string/split-3.m
--- a/test/octave.test/string/split-3.m
+++ b/test/octave.test/string/split-3.m
@@ -1,1 +1,1 @@
-split ("foo", "bar", 3)
+all (strcmp (split ("foo bar baz", " ", 2), ["foo"; "bar baz"]))
diff --git a/test/octave.test/string/string.exp b/test/octave.test/string/string.exp
--- a/test/octave.test/string/string.exp
+++ b/test/octave.test/string/string.exp
@@ -231,8 +231,12 @@
 do_test split-2.m
 
 set test split-3
+set prog_output "^ans = 1"
+do_test split-3.m
+
+set test split-4
 set prog_output "^usage:.*"
-do_test split-3.m
+do_test split-4.m
 
 set test strrep-1
 set prog_output "^ans = 1"