[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Orgmode] [PATCH] org-scan-tags: remove useless variable
From: |
Julien Danjou |
Subject: |
[Orgmode] [PATCH] org-scan-tags: remove useless variable |
Date: |
Tue, 21 Dec 2010 17:00:23 +0100 |
* lisp/org.el (org-scan-tags): remove useless todo variable.
Signed-off-by: Julien Danjou <address@hidden>
---
lisp/org.el | 5 ++---
1 files changed, 2 insertions(+), 3 deletions(-)
diff --git a/lisp/org.el b/lisp/org.el
index 3cecca7..85898ab 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -12198,7 +12198,7 @@ only lines with a TODO keyword are included in the
output."
lspos tags tags-list
(tags-alist (list (cons 0 org-file-tags)))
(llast 0) rtn rtn1 level category i txt
- todo marker entry priority)
+ marker entry priority)
(when (not (or (member action '(agenda sparse-tree)) (functionp action)))
(setq action (list 'lambda nil action)))
(save-excursion
@@ -12208,8 +12208,7 @@ only lines with a TODO keyword are included in the
output."
(org-remove-occur-highlights))
(while (re-search-forward re nil t)
(catch :skip
- (setq todo (if (match-end 1) (org-match-string-no-properties 2))
- tags (if (match-end 4) (org-match-string-no-properties 4)))
+ (setq tags (if (match-end 4) (org-match-string-no-properties 4)))
(goto-char (setq lspos (match-beginning 0)))
(setq level (org-reduced-level (funcall outline-level))
category (org-get-category))
--
1.7.2.3
- [Orgmode] [PATCH] org-scan-tags: remove useless variable,
Julien Danjou <=