Mercurial > hg > octave-nkf

changeset 6451:fdcb715e381c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-24 17:54:23 by jwe]
author jwe
date Sat, 24 Mar 2007 17:54:23 +0000
parents 674d255e0729
children 7e90124eddba
files scripts/ChangeLog scripts/plot/drawnow.m
diffstat 2 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,8 @@
 2007-03-24  John W. Eaton  <jwe@octave.org>
 
+	* plot/drawnow.m: If GNUTERM is set to wxt in the environment,
+	send terminal setting command with title option to plot stream.
+
 	* plot/legend.m: Correctly increment index into list of children..
 
 2007-03-23  John W. Eaton  <jwe@octave.org>
--- a/scripts/plot/drawnow.m
+++ b/scripts/plot/drawnow.m
@@ -98,6 +98,8 @@
       fprintf (plot_stream, "set output \"%s\"\n;", file);
     elseif (isunix () && isempty (getenv ("DISPLAY")))
       fprintf (plot_stream, "set terminal dumb\n;");
+    elseif (! isempty (h) && strcmp (getenv ("GNUTERM"), "wxt"))
+      fprintf (plot_stream, "set terminal wxt title \"Figure %d\";\n", h);
     endif
 
     if (isempty (__go_close_all_registered__))