summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2016-05-19 10:31:27 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2016-05-19 10:31:27 +0200
commit920cfbd921c3828d8696a4fc8728c4e03172894a (patch)
tree8cf58fe5d94bd8daffe2b37de669f1c33108cc3b
parent5fc351ab78a6023af43e965ccd3ff2d349afbbac (diff)
downloadorg-mode-920cfbd921c3828d8696a4fc8728c4e03172894a.tar.gz
org-agenda: Fix agenda filter by empty tag string
* lisp/org-agenda.el (org-agenda-filter-make-matcher-tag-exp): Handle empty tag strings. Reported-by: Eric Abrahamsen <eric@ericabrahamsen.net> <http://permalink.gmane.org/gmane.emacs.orgmode/107121>
-rw-r--r--lisp/org-agenda.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 2723237..5714d55 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -7625,8 +7625,8 @@ switches in the returned form."
(let (f f1) ;f = return expression. f1 = working-area
(dolist (x tags)
(let* ((tag (substring x 1))
- (isregexp (and (equal "{" (substring tag 0 1))
- (equal "}" (substring tag -1))))
+ (isregexp (and (org-string-match-p "\\`{" tag)
+ (org-string-match-p "}\\'" tag)))
regexp)
(cond
(isregexp