Mercurial > hg > octave-nkf
comparison scripts/path/savepath.m @ 6807:0089a504fdd6
[project @ 2007-08-10 17:34:59 by jwe]
author | jwe |
---|---|
date | Fri, 10 Aug 2007 17:34:59 +0000 |
parents | 98ee80702bca |
children | 93c65f2a5668 |
comparison
equal
deleted
inserted
replaced
6806:afa9123c5faa | 6807:0089a504fdd6 |
---|---|
106 end | 106 end |
107 for i = 1:length (pre) | 107 for i = 1:length (pre) |
108 fprintf (fid, "%s\n", pre{i}) | 108 fprintf (fid, "%s\n", pre{i}) |
109 endfor | 109 endfor |
110 | 110 |
111 fprintf (fid, "%s\n path (\"%s\");\n%s\n", | 111 ## Use single quotes for PATH argument to avoid string escape |
112 ## processing. | |
113 fprintf (fid, "%s\n path ('%s');\n%s\n", | |
112 beginstring, path (), endstring); | 114 beginstring, path (), endstring); |
113 | 115 |
114 for i = 1:length (post) | 116 for i = 1:length (post) |
115 fprintf (fid, "%s\n", post{i}); | 117 fprintf (fid, "%s\n", post{i}); |
116 endfor | 118 endfor |