[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] scratch/org-contacts-rebased 8b85530 037/118: org-contacts.el: Le
From: |
Stefan Monnier |
Subject: |
[elpa] scratch/org-contacts-rebased 8b85530 037/118: org-contacts.el: Let the users decide if they want to use `org-contacts' to complete mail addresses |
Date: |
Fri, 12 Nov 2021 15:36:59 -0500 (EST) |
branch: scratch/org-contacts-rebased
commit 8b85530a67b942eb50d48ee592fa0799247d89bf
Author: Grégoire Jadi <gregoire.jadi@gmail.com>
Commit: Grégoire Jadi <gregoire.jadi@gmail.com>
org-contacts.el: Let the users decide if they want to use `org-contacts' to
complete mail addresses
* contrib/lisp/org-contacts.el (org-contacts-enable-completion): A
custom boolean variable to enable the completion with
`org-contacts'. Enabled by default.
---
org-contacts.el | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/org-contacts.el b/org-contacts.el
index f99242c..8674533 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -133,6 +133,11 @@ This overrides `org-email-link-description-format' if set."
:group 'org-contacts
:type 'file)
+(defcustom org-contacts-enable-completion t
+ "Enable or not the completion in `message-mode' with `org-contacts'."
+ :group 'org-contacts
+ :type 'boolean)
+
;; Decalre external functions and variables
(declare-function wl-summary-message-number "ext:wl-summary" ())
(declare-function wl-address-header-extract-address "ext:wl-address")
@@ -642,7 +647,8 @@ This adds `org-contacts-gnus-check-mail-address' and
(add-hook 'gnus-article-prepare-hook 'org-contacts-gnus-check-mail-address)
(add-hook 'gnus-article-prepare-hook 'org-contacts-gnus-store-last-mail))
-(when (boundp 'completion-at-point-functions)
+(when (and org-contacts-enable-completion
+ (boundp 'completion-at-point-functions))
(add-hook 'message-mode-hook
(lambda ()
(add-to-list 'completion-at-point-functions
- [elpa] scratch/org-contacts-rebased ef5cb24 016/118: Copyright year fixes for contrib/., (continued)
- [elpa] scratch/org-contacts-rebased ef5cb24 016/118: Copyright year fixes for contrib/., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 5f1806a 012/118: org-contacts: fix errors when Gnus or ERC are not loaded, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 531d67a 014/118: Fix Emacs 24 compatibility issue with Emacs 24, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 2b1a75a 030/118: Improve `completion-at-point' for `org-contacts.el' in mail, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 010b2ec 029/118: org-contacts.el (org-contacts-format-name): New function, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 8bf8565 027/118: Update copyright years., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 72d2caf 022/118: add a missing require for gnus-util, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased c297cb0 020/118: Merge branch 'maint', Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased ea8cbe4 013/118: Fix copyright years for elisp files in core and contrib., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 15f35f7 040/118: orgcontacts.el: Fix `date' being broken in `org-contacts-anniversaries'., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 8b85530 037/118: org-contacts.el: Let the users decide if they want to use `org-contacts' to complete mail addresses,
Stefan Monnier <=
- [elpa] scratch/org-contacts-rebased 884d61f 042/118: Fix typo., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 48ca58b 033/118: Do not complete when it's not necessary, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 2e77024 017/118: Copyright year fixes for contrib/., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 99994ed 039/118: contrib/lisp/org-contacts.el (org-contacts-complete-name): Prevent an error when there is no completion available, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased f46131e 051/118: org-contacts.el (org-contacts-matcher): Better matcher, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 8ccb82f 052/118: org-contacts.el , fix bugs about 'tel and 'note properties, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 5ee8caa 053/118: org-contacts.el, add name alias property., Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased c0ebd3a 055/118: contrib/lisp/org-contacts: Allow org links in properties, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased 1b6cff5 026/118: contrib/lisp/org-contacts.el: Fix indentation of the file, Stefan Monnier, 2021/11/12
- [elpa] scratch/org-contacts-rebased dcd8af9 028/118: Merge branch 'maint', Stefan Monnier, 2021/11/12