# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1262119361 -3600
# Node ID f322d72d482c32f929ff74e6389581b238dd7ab4
# Parent  1e306aa51d6c386a59d2501c2aa54f64ea690ea5
deprecate complement

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+2009-12-29  Jaroslav Hajek  <highegg@gmail.com>
+
+	* set/complement.m: Deprecate.
+
 2009-12-28  Jaroslav Hajek  <highegg@gmail.com>
 
 	* strings/strcat.m: Further simplify.
diff --git a/scripts/set/complement.m b/scripts/deprecated/complement.m
rename from scripts/set/complement.m
rename to scripts/deprecated/complement.m
--- a/scripts/set/complement.m
+++ b/scripts/deprecated/complement.m
@@ -33,8 +33,17 @@
 
 ## Author: jwe
 
+## Deprecated in version 3.2
+
 function y = complement (a, b)
 
+  persistent warned = false;
+  if (! warned)
+    warned = true;
+    warning ("Octave:deprecated-function",
+             "complement is obsolete and will be removed from a future version of Octave, please use setdiff instead");
+  endif
+
   if (nargin != 2)
     print_usage ();
   endif