# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1315088938 14400
# Node ID 87015276d6255274954d630beb30343588462eb4
# Parent  4ffea87ad71b3425970d383e89359fde9820a897
codesprint: demos for title

* title.m: New demos.

diff -r 4ffea87ad71b -r 87015276d625 scripts/plot/title.m
--- a/scripts/plot/title.m	Sat Sep 03 18:25:38 2011 -0400
+++ b/scripts/plot/title.m	Sat Sep 03 18:28:58 2011 -0400
@@ -37,3 +37,20 @@
   endif
 
 endfunction
+
+%!demo
+%! clf ();
+%! ax=axes();
+%! xl = get(ax,"title");
+%! title("Testing title")
+%! assert(get(xl,"string"),"Testing title")
+
+%!demo
+%! clf ();
+%! plot3 ([0,1], [0,1], [0,1]);
+%! xl = get(gca (), "title");
+%! title("Testing title")
+%! assert(get(xl,"string"),"Testing title")
+
+## Remove from test statistics.  No real tests possible.
+%!assert (1)