emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ivy-hydra 526c7aa 113/395: counsel-org-tag-action: mess


From: Basil L. Contovounesios
Subject: [elpa] externals/ivy-hydra 526c7aa 113/395: counsel-org-tag-action: message when a tag has been removed.
Date: Thu, 25 Feb 2021 08:31:43 -0500 (EST)

branch: externals/ivy-hydra
commit 526c7aa0375f94e59591893993840d93b7b7345b
Author: Feng Shu <tumashu@163.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    counsel-org-tag-action: message when a tag has been removed.
    
    * counsel.el (counsel-org-tag-action): message when a tag has been
    removed.
    
    Some headlines of my org-files have many tags, so tags are often
    deleted by mistake, so message user seem to be a good idea.
    
    Fixes #2410
---
 counsel.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/counsel.el b/counsel.el
index 7fabef6..f192c1c 100644
--- a/counsel.el
+++ b/counsel.el
@@ -3391,7 +3391,9 @@ otherwise continue prompting for tags."
                              (delete-dups
                               (append (counsel--org-get-tags) add-tags)))
                        (counsel-org--set-tags))))))
-           (counsel-org--set-tags)))
+           (counsel-org--set-tags)
+           (unless (member x counsel-org-tags)
+             (message "Tag %S has been removed." x))))
         ((eq this-command 'ivy-call)
          (with-selected-window (active-minibuffer-window)
            (delete-minibuffer-contents)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]