diff options
author | Julien Danjou <julien@danjou.info> | 2010-12-09 18:30:22 +0000 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-10 07:30:24 +0100 |
commit | 330721f406d060d38fcde3b67bc4201361efb888 (patch) | |
tree | 26ae776bc0bb524cd3b73e83a33e5bfd1a87ca5f | |
parent | 8c2f37270d41548a56490297bff414848274e721 (diff) | |
download | org-mode-330721f406d060d38fcde3b67bc4201361efb888.tar.gz |
org: remove useless computed value in org-make-tags-matcher
* org.el (org-make-tags-matcher): Remove useless cat-p value.
Signed-off-by: Julien Danjou <julien@danjou.info>
-rw-r--r-- | lisp/org.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index 9e9cf83..b7ae6ae 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -12381,7 +12381,7 @@ also TODO lines." minus tag mm tagsmatch todomatch tagsmatcher todomatcher kwd matcher orterms term orlist re-p str-p level-p level-op time-p - prop-p pn pv po cat-p gv rest) + prop-p pn pv po gv rest) (if (string-match "/+" match) ;; match contains also a todo-matching request (progn @@ -12421,7 +12421,6 @@ also TODO lines." (setq pn (match-string 5 term) po (match-string 6 term) pv (match-string 7 term) - cat-p (equal pn "CATEGORY") re-p (equal (string-to-char pv) ?{) str-p (equal (string-to-char pv) ?\") time-p (save-match-data |