Mercurial > octave-nkf

comparison scripts/path/savepath.m @ 7151:aeeb646f6538

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-09 19:34:17 by jwe]
author jwe
date Fri, 09 Nov 2007 19:35:52 +0000
parents a1dbe9d80eee
children f071480b7eac
comparison
equal deleted inserted replaced
7150:68a1b616b7df 7151:aeeb646f6538
100 100
101 ## write the results 101 ## write the results
102 [fid, msg] = fopen (savefile, "wt"); 102 [fid, msg] = fopen (savefile, "wt");
103 if (fid < 0) 103 if (fid < 0)
104 error ("savepath: unable to open file for writing, %s, %s", savefile, msg); 104 error ("savepath: unable to open file for writing, %s, %s", savefile, msg);
105 end 105 endif
106 for i = 1:length (pre) 106 for i = 1:length (pre)
107 fprintf (fid, "%s\n", pre{i}) 107 fprintf (fid, "%s\n", pre{i})
108 endfor 108 endfor
109 109
110 ## Use single quotes for PATH argument to avoid string escape 110 ## Use single quotes for PATH argument to avoid string escape