org-agenda.el (org-search-view): Fix checking `org-agenda-show-inherited-tags'
authorTokuya Kameshima <kametoku@gmail.com>
Mon, 14 Jan 2013 17:04:31 +0000 (18:04 +0100)
committerBastien Guerry <bzg@altern.org>
Mon, 14 Jan 2013 17:04:31 +0000 (18:04 +0100)
* org-agenda.el (org-search-view): Fix checking
`org-agenda-show-inherited-tags'.

TINYCHANGE

lisp/org-agenda.el

index ca8459c..ab0c2b1 100644 (file)
@@ -4479,7 +4479,8 @@ in `org-agenda-text-search-extra-files'."
                              category-pos (get-text-property (point) 'org-category-position)
                              inherited-tags
                              (or (eq org-agenda-show-inherited-tags 'always)
-                                 (memq 'todo org-agenda-show-inherited-tags)
+                                 (and (listp org-agenda-show-inherited-tags)
+                                      (memq 'todo org-agenda-show-inherited-tags))
                                  (and (eq org-agenda-show-inherited-tags t)
                                       (or (eq org-agenda-use-tag-inheritance t)
                                           (memq 'todo org-agenda-use-tag-inheritance))))