[PATCH] emacs: rename notmuch-address-completion-hook to notmuch-address-post-completion-functions
David Bremner
david at tethera.net
Sun Nov 13 05:03:12 PST 2016
Apparently it is a (not completely adhered to) emacs convention [1] that
only hooks that don't take arguments end in 'hook'
[1]: https://www.gnu.org/software/emacs/manual/html_node/elisp/Hooks.html
---
emacs/notmuch-address.el | 4 ++--
emacs/notmuch-company.el | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el
index 36c796f..5b2beef 100644
--- a/emacs/notmuch-address.el
+++ b/emacs/notmuch-address.el
@@ -98,7 +98,7 @@ to know how address selection is made by default."
:group 'notmuch-send
:group 'notmuch-external)
-(defcustom notmuch-address-completion-hook nil
+(defcustom notmuch-address-post-completion-functions nil
"Functions called after completing address.
The completed address is passed as an argument to each function.
@@ -218,7 +218,7 @@ external commands."
(push chosen notmuch-address-history)
(delete-region beg end)
(insert chosen)
- (run-hook-with-args 'notmuch-address-completion-hook chosen))
+ (run-hook-with-args 'notmuch-address-post-completion-functions chosen))
(message "No matches.")
(ding))))
(t nil)))
diff --git a/emacs/notmuch-company.el b/emacs/notmuch-company.el
index 91c4804..b0f9782 100644
--- a/emacs/notmuch-company.el
+++ b/emacs/notmuch-company.el
@@ -86,7 +86,7 @@
(match (if (string-match notmuch-company-last-prefix arg)
(match-end 0)
0))
- (post-completion (run-hook-with-args 'notmuch-address-completion-hook arg))
+ (post-completion (run-hook-with-args 'notmuch-address-post-completion-functions arg))
(no-cache t))))
--
2.10.2
More information about the notmuch
mailing list