Mercurial > hg > octave-lyh

diff 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
line wrap: on
line diff
--- a/scripts/plot/title.m
+++ b/scripts/plot/title.m
@@ -26,17 +26,11 @@
 
 function retval = title (varargin)
 
-  nargs = nargin;
-
-  if (nargs == 0)
-    varargin{1} = "";
-    nargs++;
-  endif
-
-  if (nargs == 1)
-    set (gca, "title", varargin{1});
+  if (rem (nargin, 2) == 1)
     if (nargout > 0)
-      retval = h;
+      h = __axis_label__ ("title", varargin{:});
+    else
+      __axis_label__ ("title", varargin{:});
     endif
   else
     print_usage ();