changeset 2360:8fc0fa7ae9ca

[project @ 1996-10-10 22:36:46 by jwe]
author jwe
date Thu, 10 Oct 1996 22:39:02 +0000
parents 6d3cafa2798b
children 8fd593c4b714
files scripts/ChangeLog scripts/image/ind2gray.m scripts/image/ind2rgb.m scripts/image/rgb2ind.m scripts/linear-algebra/cond.m scripts/miscellaneous/menu.m scripts/plot/mplot.m scripts/plot/multiplot.m scripts/plot/subplot.m
diffstat 9 files changed, 22 insertions(+), 11 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,17 @@
+Thu Oct 10 17:31:01 1996  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* plot/subplot.m, plot/multiplot.m, plot/mplot.m:
+	Don't check for string value of automatic_replot.
+
+	* image/ind2ind.m, image/ind2rgb.m, image/ind2gray.m:
+	Temporarily set do_fortran_indexing to 1, not "true".
+
+	* miscellaneous/menu.m: Temporarily set page_screen_output to 0,
+	not "false".
+
+	* linear-algebra/cond.m: Don't compare propagate_empty_matrices to
+	"false".
+
 Tue Aug 20 18:27:36 1996  Kurt Hornik  <Kurt.Hornik@ci.tuwien.ac.at>
 
 	* strings/substr.m: Allow negative OFFSET.  LEN is now optional.
--- a/scripts/image/ind2gray.m
+++ b/scripts/image/ind2gray.m
@@ -52,7 +52,7 @@
 
   unwind_protect
 
-    do_fortran_indexing = "true";
+    do_fortran_indexing = 1;
 
     ## Replace indices in the input matrix with indexed values in the output
     ## matrix.
--- a/scripts/image/ind2rgb.m
+++ b/scripts/image/ind2rgb.m
@@ -45,7 +45,7 @@
 
   unwind_protect
 
-    do_fortran_indexing = "true";
+    do_fortran_indexing = 1;
 
     R = map (X(:), 1);
     G = map (X(:), 2);
--- a/scripts/image/rgb2ind.m
+++ b/scripts/image/rgb2ind.m
@@ -49,7 +49,7 @@
 
   unwind_protect
 
-    do_fortran_indexing = "true";
+    do_fortran_indexing = 1;
 
     map(:,1) = R(:);
     map(:,2) = G(:);
--- a/scripts/linear-algebra/cond.m
+++ b/scripts/linear-algebra/cond.m
@@ -31,7 +31,7 @@
   if (nargin == 1)
     [nr, nc] = size (a);
     if (nr == 0 && nc == 0)
-      if (strcmp (propagate_empty_matrices, "false"))
+      if (! propagate_empty_matrices)
         error ("cond: empty matrix is invalid as argument");
       endif
       if (strcmp (propagate_empty_matrices, "warn"))
--- a/scripts/miscellaneous/menu.m
+++ b/scripts/miscellaneous/menu.m
@@ -40,7 +40,7 @@
 
   unwind_protect
 
-    page_screen_output = "false";
+    page_screen_output = 0;
 
     if (! isempty (t))
       disp (t);
--- a/scripts/plot/mplot.m
+++ b/scripts/plot/mplot.m
@@ -51,8 +51,7 @@
 
   global multiplot_save_auto_replot = automatic_replot
 
-  if ((isstr (automatic_replot) && strcmp (automatic_replot,"true"))
-       || automatic_replot)
+  if (automatic_replot)
     warning ("turning off automatic replot for multiplot mode");
     multiplot_save_auto_replot = automatic_replot;
     automatic_replot = 0;
--- a/scripts/plot/multiplot.m
+++ b/scripts/plot/multiplot.m
@@ -58,8 +58,7 @@
     error ("multiplot: xn and yn have to be scalars");
   endif
 
-  if ((isstr (automatic_replot) && strcmp (automatic_replot,"true"))
-       || automatic_replot)
+  if (automatic_replot)
     warning ("turning off automatic replot for multiplot mode");
     multiplot_save_auto_replot = automatic_replot;
     automatic_replot = 0;
--- a/scripts/plot/subplot.m
+++ b/scripts/plot/subplot.m
@@ -78,8 +78,7 @@
     usage ("subplot (rows, columns, index) or subplot (rcn)");
   endif
 
-  if ((isstr (automatic_replot) && strcmp (automatic_replot, "true"))
-      || automatic_replot)
+  if (automatic_replot)
     warning ("turning off automatic replot for multiplot mode");
     multiplot_save_auto_replot = automatic_replot;
     automatic_replot = 0;