--- a/scripts/plot/__plr2__.m	Thu Jan 13 08:32:16 2000 +0000
+++ b/scripts/plot/__plr2__.m	Thu Jan 13 08:40:53 2000 +0000
@@ -44,13 +44,13 @@
   elseif (is_vector (theta))
     if (is_vector (rho))
       if (length (theta) != length (rho))
-	error ("polar: vector lengths must match");
+        error ("polar: vector lengths must match");
       endif
       if (rows (rho) == 1)
-	rho = rho';
+        rho = rho';
       endif
       if (rows (theta) == 1)
-	theta = theta';
+        theta = theta';
       endif
       x = rho .* cos (theta);
       y = rho .* sin (theta);
@@ -58,20 +58,20 @@
     elseif (is_matrix (rho))
       [t_nr, t_nc] = size (theta);
       if (t_nr == 1)
-	theta = theta';
-	tmp = t_nr;
-	t_nr = t_nc;
-	t_nc = tmp;
+        theta = theta';
+        tmp = t_nr;
+        t_nr = t_nc;
+        t_nc = tmp;
       endif
       [r_nr, r_nc] = size (rho);
       if (t_nr != r_nr)
-	rho = rho';
-	tmp = r_nr;
-	r_nr = r_nc;
-	r_nc = tmp;
+        rho = rho';
+        tmp = r_nr;
+        r_nr = r_nc;
+        r_nc = tmp;
       endif
       if (t_nr != r_nr)
-	error ("polar: vector and matrix sizes must match");
+        error ("polar: vector and matrix sizes must match");
       endif
       x = diag (cos (theta)) * rho;
       y = diag (sin (theta)) * rho;
@@ -81,20 +81,20 @@
     if (is_vector (rho))
       [r_nr, r_nc] = size (rho);
       if (r_nr == 1)
-	rho = rho';
-	tmp = r_nr;
-	r_nr = r_nc;
-	r_nc = tmp;
+        rho = rho';
+        tmp = r_nr;
+        r_nr = r_nc;
+        r_nc = tmp;
       endif
       [t_nr, t_nc] = size (theta);
       if (r_nr != t_nr)
-	theta = theta';
-	tmp = t_nr;
-	t_nr = t_nc;
-	t_nc = tmp;
+        theta = theta';
+        tmp = t_nr;
+        t_nr = t_nc;
+        t_nc = tmp;
       endif
       if (r_nr != t_nr)
-	error ("polar: vector and matrix sizes must match");
+        error ("polar: vector and matrix sizes must match");
       endif
       diag_r = diag (rho);
       x = diag_r * cos (theta);
@@ -102,7 +102,7 @@
       __plt2mv__ (x, y, fmt);
     elseif (is_matrix (rho))
       if (size (rho) != size (theta))
-	error ("polar: matrix dimensions must match");
+        error ("polar: matrix dimensions must match");
       endif
       x = rho .* cos (theta);
       y = rho .* sin (theta);