Mercurial > octave-nkf
changeset 8610:85c9906abfd1
use endif and endfor instead of end
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Tue, 27 Jan 2009 23:17:37 -0500 |
| parents | fcf762ba66cf |
| children | 1e47b5f04b4c |
| files | scripts/ChangeLog scripts/general/arrayfun.m scripts/image/imwrite.m scripts/plot/axis.m scripts/plot/cla.m scripts/plot/clf.m scripts/plot/gnuplot_drawnow.m scripts/plot/ribbon.m scripts/set/unique.m |
| diffstat | 9 files changed, 19 insertions(+), 15 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/ChangeLog Tue Jan 27 23:17:37 2009 -0500 @@ -1,5 +1,9 @@ 2009-01-27 John W. Eaton <jwe@octave.org> + * general/arrayfun.m, image/imwrite.m, plot/axis.m, plot/clf.m, + plot/ribbon.m, plot/gnuplot_drawnow.m, plot/cla.m, set/unique.m: + Use endif or endfor instead of "end". + * path/savepath.m: Call command_line_path instead of commandlinepath. 2009-01-27 Jason Riedy <jason@acm.org>
--- a/scripts/general/arrayfun.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/general/arrayfun.m Tue Jan 27 23:17:37 2009 -0500 @@ -168,7 +168,7 @@ [varargout{:}] = cellfun (func, cfarg{:}); else [varargout{:}] = cellfun (func, cfarg{:}, varargin{idx:len}); - end + endif endfunction %% Test function to check the "Errorhandler" option
--- a/scripts/image/imwrite.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/image/imwrite.m Tue Jan 27 23:17:37 2009 -0500 @@ -70,7 +70,7 @@ has_param_list = 1; for ii = offset:2:(nargin - 1) options.(varargin{ii}) = varargin{ii + 1}; - end + endfor else has_param_list = 0; endif
--- a/scripts/plot/axis.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/plot/axis.m Tue Jan 27 23:17:37 2009 -0500 @@ -289,8 +289,8 @@ lims(2) = min (cellfun (@max, data)(:)); else lims = [min(data(:)), max(data(:))]; - end - end + endif + endif endfunction
--- a/scripts/plot/cla.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/plot/cla.m Tue Jan 27 23:17:37 2009 -0500 @@ -62,14 +62,14 @@ hax = gca; oldhax = hax; do_reset = false; - end + endif hc = get (hax, "children"); if (! do_reset && ! isempty (hc)) hc = findobj (hc, "flat", "visible", "on"); hc = setdiff (hc, hax); - end + endif if (! isempty (hc)) ## Delete the children of the axis.
--- a/scripts/plot/clf.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/plot/clf.m Tue Jan 27 23:17:37 2009 -0500 @@ -60,7 +60,7 @@ hfig = gcf; oldfig = hfig; do_reset = false; - end + endif if (do_reset) ## Select all the children, including the one with hidden handles.
--- a/scripts/plot/gnuplot_drawnow.m Tue Jan 27 23:02:08 2009 -0500 +++ b/scripts/plot/gnuplot_drawnow.m Tue Jan 27 23:17:37 2009 -0500 @@ -123,12 +123,12 @@ title_str = sprintf ("Figure %d", h); else title_str = ""; - end + endif if (! isempty (fig.name) && ! isempty (title_str)) title_str = sprintf ("%s: %s", title_str, fig.name); elseif (! isempty (fig.name) && isempty (title_str)) title_str = fig.name; - end + endif if (! isempty (title_str)) title_str = sprintf ("title \"%s\"", title_str); endif @@ -191,15 +191,15 @@ term_str = sprintf ("set terminal %s", term); if (! isempty (enh_str)) term_str = sprintf ("%s %s", term_str, enh_str); - end + endif if (! isempty (title_str)) term_str = sprintf ("%s %s", term_str, title_str); - end + endif if (! isempty (size_str)) ## size_str goes last to permit specification of canvas size ## for terminals cdr/corel term_str = sprintf ("%s %s", term_str, size_str); - end + endif if (nargin > 2 && ischar (opts_str)) ## Options must go last term_str = sprintf ("%s %s", term_str, opts_str); @@ -209,7 +209,7 @@ ## gnuplot will pick up the GNUTERM environment variable itself ## so no need to set the terminal type if not also setting the ## figure title, enhanced mode, or position. - end + endif endif if (nargin == 4)