changeset 3619:a7fe24b18fa4

[project @ 2000-03-22 21:56:18 by jwe]
author jwe
date Wed, 22 Mar 2000 21:56:19 +0000
parents 8cea69ad95ae
children 0886bbb236cb
files scripts/ChangeLog scripts/plot/bottom_title.m scripts/plot/title.m scripts/plot/top_title.m
diffstat 4 files changed, 9 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,8 @@
 2000-03-22  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* plot/title.m, plot/bottom_title.m, plot/top_title.m: 
+	Undo string escapes in text twice(!) before sending to gnuplot.
+
 	* image/saveimage.m: Add comment to file saying who created it and
 	when it was created.  Suggested by Stephen Eglen
 	<stephen@cogsci.ed.ac.uk>.
--- a/scripts/plot/bottom_title.m
+++ b/scripts/plot/bottom_title.m
@@ -38,7 +38,8 @@
   if (isstr (text))
     gset top_title;
     gset title;
-    eval (sprintf ("gset bottom_title \"%s\"", text));
+    eval (sprintf ("gset bottom_title \"%s\"",
+		   undo_string_escapes (undo_string_escapes (text))));
   else
     error ("bottom_title: text must be a string");
   endif
--- a/scripts/plot/title.m
+++ b/scripts/plot/title.m
@@ -34,8 +34,8 @@
   endif
 
   if (isstr (text))
-    command = sprintf ("gset title \"%s\"", text);
-    eval (command);
+    eval (sprintf ("gset title \"%s\"",
+		   undo_string_escapes (undo_string_escapes (text))));
   else
     error ("title: text must be a string");
   endif
--- a/scripts/plot/top_title.m
+++ b/scripts/plot/top_title.m
@@ -40,7 +40,8 @@
   if (isstr (text))
     gset bottom_title;
     gset title;
-    eval (sprintf ("gset top_title \"%s\"", text));
+    eval (sprintf ("gset top_title \"%s\"",
+		   undo_string_escapes (undo_string_escapes (text))));
   else
     error ("error: top_title: text must be a string");
   endif