# HG changeset patch
# User Pieter Eendebak <pieter.eendebak@gmail.com>
# Date 1249371213 -7200
# Node ID a3ae7abaf659ab2e9aa6696eab01c00d7a7b24f1
# Parent  bca39c365fda1d566bd40dfcef8c494aaffc6f47
support cellstrs in setxor

diff -r bca39c365fda -r a3ae7abaf659 scripts/ChangeLog
--- a/scripts/ChangeLog	Mon Aug 03 15:53:30 2009 +0200
+++ b/scripts/ChangeLog	Tue Aug 04 09:33:33 2009 +0200
@@ -1,3 +1,7 @@
+2009-08-04  Pieter Eendebak <pieter.eendebak@gmail.com> 
+
+	* set/setxor.m: Support cell arrays of strings.
+
 2009-08-03  Jaroslav Hajek  <highegg@gmail.com>
 
 	* general/sub2ind.m: Remove source.
diff -r bca39c365fda -r a3ae7abaf659 scripts/set/setxor.m
--- a/scripts/set/setxor.m	Mon Aug 03 15:53:30 2009 +0200
+++ b/scripts/set/setxor.m	Tue Aug 04 09:33:33 2009 +0200
@@ -71,7 +71,11 @@
       na = numel (a); nb = numel (b);
       [c, i] = sort ([a(:); b(:)]);
       n = length (c);
-      idx = find (c(1:n-1) == c(2:n));
+      if (iscell (c))
+        idx = find (strcmp (c(1:n-1), c(2:n)));	  
+      else
+        idx = find (c(1:n-1) == c(2:n));
+      endif
       if (! isempty (idx))
 	c([idx, idx+1]) = [];
 	i([idx, idx+1]) = [];