Mercurial > hg > octave-nkf

diff scripts/plot/util/zoom.m @ 20038:9fc020886ae9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Clean up m-files to follow Octave coding conventions. Try to trim long lines to < 80 chars. Use '##' for single line comments. Use '(...)' around tests for if/elseif/switch/while. Abut cell indexing operator '{' next to variable. Abut array indexing operator '(' next to variable. Use space between negation operator '!' and following expression. Use two newlines between endfunction and start of %!test or %!demo code. Remove unnecessary parens grouping between short-circuit operators. Remove stray extra spaces (typos) between variables and assignment operators. Remove stray extra spaces from ends of lines.
author Rik <rik@octave.org>
date Mon, 23 Feb 2015 14:54:39 -0800
parents ca7599ae464d
children e1d7bd38b82b
line wrap: on
line diff
--- a/scripts/plot/util/zoom.m
+++ b/scripts/plot/util/zoom.m
@@ -60,18 +60,16 @@
 
 function zoom (varargin)
 
-  hfig = NaN;
-
   nargs = nargin;
-
   if (nargs > 2)
     print_usage ();
   endif
 
-  if (nargin == 1 && nargout > 0 && isfigure (varargin{1}))
+  if (nargs == 1 && nargout > 0 && isfigure (varargin{1}))
     error ("zoom_object_handle = zoom (hfig): not implemented");
   endif
 
+  hfig = NaN;
   if (nargs == 2)
     hfig = varargin{1};
     if (isfigure (hfig))
@@ -176,6 +174,7 @@
 
 endfunction
 
+
 %!demo
 %! clf;
 %! sombrero ();
@@ -196,3 +195,4 @@
 %! pause (1);
 %! %% return to zoom level set by last call to "zoom reset"
 %! zoom out;
+