Mercurial > hg > octave-nkf
changeset 6249:c507206c45bc
[project @ 2007-01-22 20:00:06 by jwe]
author | jwe |
---|---|
date | Mon, 22 Jan 2007 20:00:06 +0000 |
parents | 7fad1fad19e1 |
children | ff5e6cf72bda |
files | scripts/ChangeLog scripts/testfun/test.m |
diffstat | 2 files changed, 12 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,7 @@ +2007-01-22 Bob Weigel <rweigel@gmu.edu> + + * testfun/test.m: Check for all files in path, use first found. + 2007-01-22 David Bateman <dbateman@free.fr> * polynomial/spline.m: Make DG a column instead of a row vector.
--- a/scripts/testfun/test.m +++ b/scripts/testfun/test.m @@ -146,12 +146,16 @@ endif ## locate the file to test - __file = file_in_loadpath (__name); - if (isempty (__file)) - __file = file_in_loadpath ([__name, ".m"]); + __file = file_in_loadpath (__name, "all"); + if (isempty (__file)) + __file = file_in_loadpath ([__name, ".m"], "all"); endif if (isempty (__file)) - __file = file_in_loadpath ([__name, ".cc"]); + __file = file_in_loadpath ([__name, ".cc"], "all"); + endif + if (iscell (__file)) + ## If repeats, return first in path. + __file = __file{1}; endif if (isempty (__file)) if (__grabdemo)