diff scripts/testfun/test.m @ 6024:500d884ae373

[project @ 2006-10-03 14:27:33 by jwe]
author jwe
date Tue, 03 Oct 2006 14:27:34 +0000
parents 9c134531c2c4
children 34f96dd5441b
line wrap: on
line diff
--- a/scripts/testfun/test.m
+++ b/scripts/testfun/test.m
@@ -479,12 +479,12 @@
   pos = [];
 
   ## Find the end of the name
-  right = min(find(def=='('));
+  right = find(def=='(', 1);
   if isempty(right), return; endif
-  right = max(find(def(1:right-1) != ' '));
+  right = find(def(1:right-1) != ' ', 1, "last");
 
   ## Find the beginning of the name
-  left = max([find(def(1:right)==' '),find(def(1:right)=='=')]);
+  left = max([find(def(1:right)==' ', 1, "last"),find(def(1:right)=='=', 1, "last")]);
   if isempty(left), return; endif
   left++;