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

diff -r e2f85b298a74 -r 3e4564ddd985 scripts/strings/split.m
--- a/scripts/strings/split.m	Fri Sep 23 21:10:36 2005 +0000
+++ b/scripts/strings/split.m	Fri Sep 23 21:19:17 2005 +0000
@@ -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 -r e2f85b298a74 -r 3e4564ddd985 test/octave.test/string/split-3.m
--- a/test/octave.test/string/split-3.m	Fri Sep 23 21:10:36 2005 +0000
+++ b/test/octave.test/string/split-3.m	Fri Sep 23 21:19:17 2005 +0000
@@ -1,1 +1,1 @@
-split ("foo", "bar", 3)
+all (strcmp (split ("foo bar baz", " ", 2), ["foo"; "bar baz"]))
diff -r e2f85b298a74 -r 3e4564ddd985 test/octave.test/string/string.exp
--- a/test/octave.test/string/string.exp	Fri Sep 23 21:10:36 2005 +0000
+++ b/test/octave.test/string/string.exp	Fri Sep 23 21:19:17 2005 +0000
@@ -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"