Mercurial > hg > octave-nkf

comparison scripts/plot/patch.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 57d2546ad8d5
children dd88d61d443f
comparison
equal deleted inserted replaced
7207:71c03c7239fb 7208:a730e47fda4d
35 ## Author: jwe 35 ## Author: jwe
36 36
37 function h = patch (varargin) 37 function h = patch (varargin)
38 38
39 if (isscalar (varargin{1}) && ishandle (varargin{1})) 39 if (isscalar (varargin{1}) && ishandle (varargin{1}))
40 h = varargin {1}; 40 h = varargin{1};
41 if (! strcmp (get (h, "type"), "axes") && ! strcmp (get (h, "type"), "hggroup")) 41 if (! strcmp (get (h, "type"), "axes") && ! strcmp (get (h, "type"), "hggroup"))
42 error ("patch: expecting first argument to be an axes or hggroup object"); 42 error ("patch: expecting first argument to be an axes or hggroup object");
43 endif 43 endif
44 oldh = gca (); 44 oldh = gca ();
45 unwind_protect 45 unwind_protect