# HG changeset patch
# User Ben Abbott  <bpabbott@mac.com>
# Date 1291333687 18000
# Node ID 262c365eb71c607cba202be82954344ce95c0e36
# Parent  c9df571efe958c1e32bf2d06705164f29cee5ed6
fill.m: Allow multiple filled polygons.

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,6 @@
 2010-12-02  Ben Abbott <bpabbott@mac.com>
 
+	* plot/fill.m: Allow multiple filled polygons.
 	* plot/subplot.m: Add suppport for "align" and "replace" options.
 
 2010-11-26  John W. Eaton  <jwe@octave.org>
diff --git a/scripts/plot/fill.m b/scripts/plot/fill.m
--- a/scripts/plot/fill.m
+++ b/scripts/plot/fill.m
@@ -36,6 +36,10 @@
   unwind_protect
     axes (h);
 
+    nextplot = get (h, "nextplot");
+    if (strncmp (nextplot, "replace", 7))
+      set (h, "nextplot", "add");
+    endif
     for i = 1 : length (iargs)
       if (i == length (iargs))
         args = varargin (iargs(i):end);
@@ -49,6 +53,9 @@
       endif
       htmp (end + 1) = tmp;
     endfor
+    if (strncmp (nextplot, "replace", 7))
+      set (h, "nextplot", nextplot);
+    endif
   unwind_protect_cleanup
     axes (oldh);
   end_unwind_protect