Mercurial > octave-nkf

comparison scripts/plot/__plt_get_axis_arg__.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 62ebba45054e
children 6b50fd2d4ca6
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
42 obj = get (tmp); 42 obj = get (tmp);
43 if (strcmp (obj.type, "axes") || strcmp (obj.type, "hggroup")) 43 if (strcmp (obj.type, "axes") || strcmp (obj.type, "hggroup"))
44 h = ancestor (tmp, "axes"); 44 h = ancestor (tmp, "axes");
45 varargin(1) = []; 45 varargin(1) = [];
46 if (isempty (varargin)) 46 if (isempty (varargin))
47 varargin = {}; 47 varargin = {};
48 endif 48 endif
49 else 49 else
50 error ("%s: expecting first argument to be axes handle", caller); 50 error ("%s: expecting first argument to be axes handle", caller);
51 endif 51 endif
52 else 52 else
56 else 56 else
57 h = get (f, "currentaxes"); 57 h = get (f, "currentaxes");
58 endif 58 endif
59 if (isempty (h)) 59 if (isempty (h))
60 if (nogca) 60 if (nogca)
61 h = NaN; 61 h = NaN;
62 else 62 else
63 h = gca (); 63 h = gca ();
64 endif 64 endif
65 endif 65 endif
66 if (nargin < 2) 66 if (nargin < 2)
67 varargin = {}; 67 varargin = {};
68 endif 68 endif