Mercurial > octave-nkf

comparison scripts/plot/title.m @ 6412:b2096bb759b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-15 02:33:45 by jwe]
author jwe
date Thu, 15 Mar 2007 02:36:10 +0000
parents 44c91c5dfe1d
children 93c65f2a5668
comparison
equal deleted inserted replaced
6411:2f64090cdc14 6412:b2096bb759b1
24 24
25 ## Author: jwe 25 ## Author: jwe
26 26
27 function retval = title (varargin) 27 function retval = title (varargin)
28 28
29 nargs = nargin; 29 if (rem (nargin, 2) == 1)
30
31 if (nargs == 0)
32 varargin{1} = "";
33 nargs++;
34 endif
35
36 if (nargs == 1)
37 set (gca, "title", varargin{1});
38 if (nargout > 0) 30 if (nargout > 0)
39 retval = h; 31 h = __axis_label__ ("title", varargin{:});
32 else
33 __axis_label__ ("title", varargin{:});
40 endif 34 endif
41 else 35 else
42 print_usage (); 36 print_usage ();
43 endif 37 endif
44 38