Mercurial > hg > octave-lyh

diff scripts/plot/area.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 1aeb39118764
children be55736a0783
line wrap: on
line diff
--- a/scripts/plot/area.m
+++ b/scripts/plot/area.m
@@ -120,11 +120,11 @@
 
     if (i == 1)
       h = patch (ax, [x1(1), x1, fliplr(x1)], [bv, y1, bv*ones(1, length(y1))],
-		 __next_line_color__ (), "parent", hg);
+                 __next_line_color__ (), "parent", hg);
     else
       y1 = y0 + y1;
       h = patch (ax, [x1(1), x1, fliplr(x1)], [y0(1), y1, fliplr(y0)],
-		 __next_line_color__ (), "parent", hg);
+                 __next_line_color__ (), "parent", hg);
     endif
 
     y0 = y1;
@@ -171,12 +171,12 @@
       b0 = get (h, "basevalue");
 
       for hh = hlist(:)'
-	if (hh != h)
-	  b1 = get (hh, "basevalue");
-	  if (b1 != b0)
-	    set (hh, "basevalue", b0);
-	  endif
-	endif
+        if (hh != h)
+          b1 = get (hh, "basevalue");
+          if (b1 != b0)
+            set (hh, "basevalue", b0);
+          endif
+        endif
       endfor
       update_data (h, d);
     unwind_protect_cleanup