Mercurial > octave-antonio

comparison scripts/plot/__plt_get_axis_arg__.m @ 11587:c792872f8942

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children a04e32272ecb
comparison
equal deleted inserted replaced
11586:12df7854fa7c 11587:c792872f8942
33 nogca = false; 33 nogca = false;
34 endif 34 endif
35 35
36 ## Figure handles are integers, but object handles are non integer, 36 ## Figure handles are integers, but object handles are non integer,
37 ## therefore ignore integer scalars. 37 ## therefore ignore integer scalars.
38 if (nargin > 1 && length (varargin) > 0 && isnumeric (varargin{1}) 38 if (nargin > 1 && length (varargin) > 0 && isnumeric (varargin{1})
39 && numel (varargin{1}) == 1 && ishandle (varargin{1}(1)) 39 && numel (varargin{1}) == 1 && ishandle (varargin{1}(1))
40 && varargin{1}(1) != 0 && ! isfigure (varargin{1}(1))) 40 && varargin{1}(1) != 0 && ! isfigure (varargin{1}(1)))
41 tmp = varargin{1}; 41 tmp = varargin{1};
42 obj = get (tmp); 42 obj = get (tmp);
43 if ((strcmp (obj.type, "axes") && ! strcmp (obj.tag, "legend")) 43 if ((strcmp (obj.type, "axes") && ! strcmp (obj.tag, "legend"))
44 || strcmp (obj.type, "hggroup")) 44 || strcmp (obj.type, "hggroup"))
45 h = ancestor (tmp, "axes"); 45 h = ancestor (tmp, "axes");
46 varargin(1) = []; 46 varargin(1) = [];
47 if (isempty (varargin)) 47 if (isempty (varargin))
48 varargin = {}; 48 varargin = {};