Mercurial > octave-nkf

comparison scripts/plot/__axes_limits__.m @ 7208:a730e47fda4d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-28 02:32:41 by jwe]
author jwe
date Wed, 28 Nov 2007 02:32:42 +0000
parents bd56a0609c4f
children dd88d61d443f
comparison
equal deleted inserted replaced
7207:71c03c7239fb 7208:a730e47fda4d
21 function retval = __axes_limits__ (fcn, varargin) 21 function retval = __axes_limits__ (fcn, varargin)
22 retval = []; 22 retval = [];
23 fcnmode = sprintf("%smode", fcn); 23 fcnmode = sprintf("%smode", fcn);
24 24
25 if (nargin > 1 && isscalar (varargin{1}) && ishandle (varargin{1})) 25 if (nargin > 1 && isscalar (varargin{1}) && ishandle (varargin{1}))
26 h = varargin {1}; 26 h = varargin{1};
27 off = 1; 27 off = 1;
28 if (! strcmp (get (h, "type"), "axes")) 28 if (! strcmp (get (h, "type"), "axes"))
29 error ("%s: expecting first argument to be an axes object", fcn); 29 error ("%s: expecting first argument to be an axes object", fcn);
30 endif 30 endif
31 else 31 else
34 endif 34 endif
35 35
36 if (nargin == off + 1) 36 if (nargin == off + 1)
37 retval = get (h, fcn); 37 retval = get (h, fcn);
38 else 38 else
39 arg = varargin {off + 1}; 39 arg = varargin{off + 1};
40 40
41 if (ischar (arg)) 41 if (ischar (arg))
42 arg = tolower (arg); 42 arg = tolower (arg);
43 if (strcmp ("mode", arg)) 43 if (strcmp ("mode", arg))
44 44