Mercurial > hg > octave-nkf
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++;