Mercurial > octave-nkf

comparison scripts/path/savepath.m @ 20550:76f67400649e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use '-local' option to warning to simplify BIST tests. * dos.m, unix.m, savepath.m, kurtosis.m, skewness.m: Use '-local' option to warning instead of unwind/protect block.
author Rik <rik@octave.org>
date Fri, 25 Sep 2015 21:00:29 -0700
parents 9fc020886ae9
children
comparison
equal deleted inserted replaced
20549:71e60880105a 20550:76f67400649e
200 %! ## Create blank .octaverc file 200 %! ## Create blank .octaverc file
201 %! fid = fopen (".octaverc", "wt"); 201 %! fid = fopen (".octaverc", "wt");
202 %! assert (fid >= 0); 202 %! assert (fid >= 0);
203 %! fclose (fid); 203 %! fclose (fid);
204 %! ## Save path into local .octaverc file 204 %! ## Save path into local .octaverc file
205 %! warning ("off", "Octave:savepath-local"); 205 %! warning ("off", "Octave:savepath-local", "local");
206 %! status = savepath (); 206 %! status = savepath ();
207 %! assert (status == 0); 207 %! assert (status == 0);
208 %! ## Compare old and new versions 208 %! ## Compare old and new versions
209 %! fid = fopen (fname, "rb"); 209 %! fid = fopen (fname, "rb");
210 %! assert (fid >= 0); 210 %! assert (fid >= 0);