Mercurial > octave-nkf

comparison scripts/plot/private/__axes_limits__.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 1aeb39118764
children fd0a3ac60b0e
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
34 else 34 else
35 arg = varargin{1}; 35 arg = varargin{1};
36 36
37 if (ischar (arg)) 37 if (ischar (arg))
38 if (strcmpi (arg, "mode")) 38 if (strcmpi (arg, "mode"))
39 retval = get (h, fcnmode); 39 retval = get (h, fcnmode);
40 elseif (strcmpi (arg, "auto") || strcmpi (arg, "manual")) 40 elseif (strcmpi (arg, "auto") || strcmpi (arg, "manual"))
41 set (h, fcnmode, arg); 41 set (h, fcnmode, arg);
42 endif 42 endif
43 else 43 else
44 if (!isnumeric (arg) && any (size(arg(:)) != [2, 1])) 44 if (!isnumeric (arg) && any (size(arg(:)) != [2, 1]))
45 error ("%s: argument must be a 2 element vector", fcn); 45 error ("%s: argument must be a 2 element vector", fcn);
46 else 46 else
47 set (h, fcn, arg(:)); 47 set (h, fcn, arg(:));
48 endif 48 endif
49 endif 49 endif
50 endif 50 endif
51 51
52 endfunction 52 endfunction