diff options
author | Bastien Guerry <bzg@altern.org> | 2014-05-25 07:16:15 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2014-05-25 07:16:15 +0200 |
commit | 866d7eddd0e33cc42906955e9ea9f0b314a16c72 (patch) | |
tree | b30f6c2e25139f6b60af4c7160a3a9916bad9f26 | |
parent | 56b47fb71d1c01762ffe8c34bf750df554e2805b (diff) | |
download | org-mode-866d7eddd0e33cc42906955e9ea9f0b314a16c72.tar.gz |
org-agenda.el (org-agenda-set-restriction-lock): Remove restriction lock before setting it
* org-agenda.el (org-agenda-set-restriction-lock): Remove
restriction lock before setting it.
This fixes a small bug: when restriction lock is active on a subtree
and C-c C-x < before the first headline, the new restriction is set to
the entire file, but the old one was still present.
-rw-r--r-- | lisp/org-agenda.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index aa6fcf2..20ecb0c 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7054,6 +7054,7 @@ Restriction will be the file if TYPE is `file', or if type is the universal prefix '(4), or if the cursor is before the first headline in the file. Otherwise, restriction will be to the current subtree." (interactive "P") + (org-agenda-remove-restriction-lock 'noupdate) (and (equal type '(4)) (setq type 'file)) (setq type (cond (type type) |