[O] [PATCH] org-get-tags-at: exclude filetags when local is t

[Matt Lundin]

* lisp/org.el (org-get-tags-at): Don't include filetags if local is t.

The function org-get-tags-at and the functions that called it were
including inherited file tags even if the user requested only local
tags. This patch fixes the behavior.
---
 lisp/org.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 61668ce..afcd4cb 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -12798,7 +12798,9 @@ ignore inherited ones."
                      (or (org-up-heading-safe) (error nil))
                      (setq parent t)))
                (error nil)))))
-       (append (org-remove-uniherited-tags org-file-tags) tags)))))
+       (if local 
+           tags
+         (append (org-remove-uniherited-tags org-file-tags) tags))))))
 
 (defun org-add-prop-inherited (s)
   (add-text-properties 0 (length s) '(inherited t) s)
-- 
1.7.5