From c06003863a6b60266ac9eeba7d18073e66ad4229 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Wed, 25 Jan 2012 16:55:41 +0100 Subject: [PATCH] org.el: Small code cleanup. --- lisp/org.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 61cef0a83..1fa725907 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -12783,7 +12783,7 @@ headlines matching this string." (buffer-name (buffer-base-buffer))))))) (case-fold-search nil) (org-map-continue-from nil) - lspos tags tags-list + lspos tags (tags-alist (list (cons 0 org-file-tags))) (llast 0) rtn rtn1 level category i txt todo marker entry priority) @@ -12874,8 +12874,7 @@ headlines matching this string." (make-string (1- level) ?.) "") (org-get-heading)) category - tags-list - ) + tags-list) priority (org-get-priority txt)) (goto-char lspos) (setq marker (org-agenda-new-marker)) -- 2.11.4.GIT