[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 5e54abd 123/399: Fix counsel-org-tag-agenda
From: |
Oleh Krehel |
Subject: |
[elpa] master 5e54abd 123/399: Fix counsel-org-tag-agenda |
Date: |
Sat, 20 Jul 2019 14:57:04 -0400 (EDT) |
branch: master
commit 5e54abd0eb529aff16f3050ba134c88ca7bf19af
Author: Gonçalo Santos <address@hidden>
Commit: GitHub <address@hidden>
Fix counsel-org-tag-agenda
As of Org 9.2.3, this function is not working because `org-set-tags` is the
function that received the tags list or string, while the counsel substitute
doesn't have any parameters.
Changing this to `org-set-tags-command`, which is called from
`org-agenda-set-tags` fixes the issue.
---
counsel.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/counsel.el b/counsel.el
index f3efba1..09163e9 100644
--- a/counsel.el
+++ b/counsel.el
@@ -3072,13 +3072,13 @@ otherwise continue prompting for tags."
(defun counsel-org-tag-agenda ()
"Set tags for the current agenda item."
(interactive)
- (let ((store (symbol-function 'org-set-tags)))
+ (let ((store (symbol-function 'org-set-tags-command)))
(unwind-protect
(progn
- (fset 'org-set-tags
+ (fset 'org-set-tags-command
(symbol-function 'counsel-org-tag))
(org-agenda-set-tags nil nil))
- (fset 'org-set-tags store))))
+ (fset 'org-set-tags-command store))))
(define-obsolete-variable-alias 'counsel-org-goto-display-tags
'counsel-org-headline-display-tags "0.10.0")
- [elpa] master ffa2d8f 112/399: counsel.el (counsel-unicode-char): Fix sorting, (continued)
- [elpa] master ffa2d8f 112/399: counsel.el (counsel-unicode-char): Fix sorting, Oleh Krehel, 2019/07/20
- [elpa] master 18d7f84 117/399: counsel.el (counsel-yank-pop-action): Also works for strings, Oleh Krehel, 2019/07/20
- [elpa] master c56ad2a 114/399: ivy-hydra.el (ivy-dispatching-done-hydra): Improve, Oleh Krehel, 2019/07/20
- [elpa] master 344aebc 116/399: counsel.el (counsel-dired-jump): Improve, Oleh Krehel, 2019/07/20
- [elpa] master b27ef9e 111/399: counsel.el (counsel-git-cands): Extract, Oleh Krehel, 2019/07/20
- [elpa] master 1b5af1e 115/399: counsel.el (counsel-file-jump-args): Adjust, Oleh Krehel, 2019/07/20
- [elpa] master 05763ae 121/399: counsel.el (counsel-git): Fix default-directory, Oleh Krehel, 2019/07/20
- [elpa] master aef1242 118/399: ivy-overlay.el (ivy-overlay-impossible-p): Simplify, Oleh Krehel, 2019/07/20
- [elpa] master 3cb9d72 120/399: ivy-overlay.el (ivy-display-function-overlay): Fix weird offset, Oleh Krehel, 2019/07/20
- [elpa] master ea6ef81 122/399: Allow recursive minibuffers to use ivy-display-function-alist, Oleh Krehel, 2019/07/20
- [elpa] master 5e54abd 123/399: Fix counsel-org-tag-agenda,
Oleh Krehel <=
- [elpa] master 1998783 125/399: counsel.el (counsel-find-file-ignore-regexp): Add nested hidden dotfiles, Oleh Krehel, 2019/07/20
- [elpa] master bb5d0d4 119/399: ivy-overlay.el (ivy-display-function-overlay): Refactor, Oleh Krehel, 2019/07/20
- [elpa] master f9b64c3 126/399: swiper.el (swiper-isearch): Add, Oleh Krehel, 2019/07/20
- [elpa] master 1606918 129/399: ivy.el (ivy-read): Allow :update-fn to be 'auto, Oleh Krehel, 2019/07/20
- [elpa] master f4431d4 133/399: doc/ivy.org (automatically integrated packages): Add, Oleh Krehel, 2019/07/20
- [elpa] master 0465711 124/399: counsel.el (counsel-org-tag-agenda): Check org-version, Oleh Krehel, 2019/07/20
- [elpa] master 3416142 128/399: counsel.el (counsel--async-sentinel): Fix index jumping randomly, Oleh Krehel, 2019/07/20
- [elpa] master 31a554d 130/399: swiper.el (swiper-isearch): Anchor to line-beginning-position, Oleh Krehel, 2019/07/20
- [elpa] master adad2e4 127/399: counsel.el: Strip space from initial input of counsel-package, Oleh Krehel, 2019/07/20
- [elpa] master df8901f 132/399: swiper.el (swiper-query-replace): Add preview overlays, Oleh Krehel, 2019/07/20