Fix reverse interpretation of the list value o `org-use-tag-inheritance'.

lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-10-06  Carsten Dominik  <dominik@science.uva.nl>
 
+	* org.el (org-remove-uniherited-tags): Fix reverse interpretation
+	of the list value o `org-use-tag-inheritance'.
+
 	* org-attach.el (org-attach-auto-tag): New option.
 	(org-attach-tag, org-attach-untag): New functions.
 	(org-attach-attach, org-attach-new, org-attach-sync): Call

lisp/org.el

@@ -8784,7 +8784,9 @@ only lines with a TODO keyword are included in the output."
 	       (lambda (x) (if (string-match org-use-tag-inheritance x) x nil))
 	       tags)))
    ((listp org-use-tag-inheritance)
-    (org-delete-all org-use-tag-inheritance tags))))
+    (delq nil (mapcar
+	       (lambda (x) (if (member x org-use-tag-inheritance) x nil))
+	       tags)))))
 
 (defvar todo-only) ;; dynamically scoped