[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Make `org-tags-view' stop setting globally `org--matcher-tag
From: |
Samuel Loury |
Subject: |
[O] [PATCH] Make `org-tags-view' stop setting globally `org--matcher-tags-todo-only' |
Date: |
Thu, 19 Jan 2017 08:49:42 +0100 |
Dear all,
I would like to propose a patch for `org-tags-view' to make it stop
setting globally `org--matcher-tags-todo-only'
Setting `org--matcher-tags-todo-only' has side effects on other
commands. For instance, the following clock table changes its behavior
whether `org--matcher-tags-todo-only' is nil or '(4)
--8<---------------cut here---------------start------------->8---
#+BEGIN: clocktable :tags "-perso" :fileskip0 :stepskip0 :link t :maxlevel 5
:emphasize t :link t :block today-1 :scope agenda :inherit-props t
--8<---------------cut here---------------end--------------->8---
I did not have time to investigate why the behavior of the clock table
is impacted by `org--matcher-tags-todo-only'. I quickly feel lost in
this code.
From c5c763a9aca8cfd8a707b0d7e814bc37f5eeafa1 Mon Sep 17 00:00:00 2001
From: Samuel Loury <address@hidden>
Date: Thu, 19 Jan 2017 08:39:50 +0100
Subject: [PATCH] Make `org-tags-view' stop setting globally
`org--matcher-tags-todo-only'
`org--matcher-tags-todo-only' is used at several places in the
code.
The first call of `org-tags-view' that changes its value, like C-u
M-x org-tags-view has the side effect of making all other commands
that don't set this value explicitely rely on this value.
* lisp/org-agenda.el (org-tags-view): Add the declaration of
`org--matcher-tags-todo-only' in the let form
---
lisp/org-agenda.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 737e1841f..ac4bde389 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -4681,6 +4681,7 @@ The prefix arg TODO-ONLY limits the search to TODO
entries."
org-tags-match-list-sublevels)
(completion-ignore-case t)
rtn rtnall files file pos matcher
+ org--matcher-tags-todo-only
buffer)
(when (and (stringp match) (not (string-match "\\S-" match)))
(setq match nil))
--
2.11.0
--
Konubinix
GPG Key : 7439106A
Fingerprint: 5993 BE7A DA65 E2D9 06CE 5C36 75D2 3CED 7439 106A
signature.asc
Description: PGP signature
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [O] [PATCH] Make `org-tags-view' stop setting globally `org--matcher-tags-todo-only',
Samuel Loury <=