[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-contacts 531d67a715 014/154: Fix Emacs 24 compatibi
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-contacts 531d67a715 014/154: Fix Emacs 24 compatibility issue with Emacs 24 |
Date: |
Fri, 9 Sep 2022 15:58:22 -0400 (EDT) |
branch: externals/org-contacts
commit 531d67a7150b3fbe4f97d736e65ab476706b1a31
Author: Tassilo Horn <tassilo@member.fsf.org>
Commit: Carsten Dominik <carsten.dominik@gmail.com>
Fix Emacs 24 compatibility issue with Emacs 24
* contrib/lisp/org-contacts.el (completion-table-case-fold): Make
completion compatible with Emacs 24Fix org-contacts completion at point
(was: org-contacts completion stopped working)
julien Barnier <julien@nozav.org> writes:
Hi Julien,
>> I use a very recent emacs 24 bzr checkout and org master from git.
>> Not sure who's the culprit.
>
> Same problem here. After a quick look it seems that there has been a
> recent change in the arguments taken by the completion-table-case-fold
> function in minibuffer.el :
>
> http://bzr.savannah.gnu.org/lh/emacs/trunk/revision/105991
Thanks for the pointer!
> But I don't think I could be able to find a fix by myself.
But I was able, so good teamwork, mate. :-)
--8<---------------cut here---------------start------------->8---
>From d89ca3ce39cd7436e5205744adcf468d9619180f Mon Sep 17 00:00:00 2001
From: Tassilo Horn <tassilo@member.fsf.org>
Date: Thu, 13 Oct 2011 17:02:07 +0200
Subject: [PATCH 2/2] Fix org-contacts completion at point.
---
org-contacts.el | 11 +++++------
1 file changed, 5 insertions(+), 6 deletions(-)
diff --git a/org-contacts.el b/org-contacts.el
index f4d9cd7a94..4b21d26372 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -169,9 +169,10 @@ If both match values are nil, return all contacts."
(when (not (fboundp 'completion-table-case-fold))
;; That function is new in Emacs 24...
- (defun completion-table-case-fold (table string pred action)
- (let ((completion-ignore-case t))
- (complete-with-action action table string pred))))
+ (defun completion-table-case-fold (table &optional dont-fold)
+ (lambda (string pred action)
+ (let ((completion-ignore-case (not dont-fold)))
+ (complete-with-action action table string pred)))))
(defun org-contacts-complete-name (&optional start)
"Complete text at START with a user name and email."
@@ -226,9 +227,7 @@ If both match values are nil, return all contacts."
;; If the user has an email
address, append USER <EMAIL>.
if email collect
(org-contacts-format-email contact-name email))
", ")))))
- (list start end (if org-contacts-completion-ignore-case
- (apply-partially #'completion-table-case-fold
completion-list)
- completion-list))))
+ (list start end (completion-table-case-fold completion-list (not
org-contacts-completion-ignore-case)))))
(defun org-contacts-message-complete-function ()
"Function used in `completion-at-point-functions' in `message-mode'."
- [elpa] externals/org-contacts d630e91dee 033/154: Add caching mecanism, (continued)
- [elpa] externals/org-contacts d630e91dee 033/154: Add caching mecanism, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 680dc1f24d 039/154: org-contacts.el: Started to silent byte-compiler, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 3f1509bfa2 035/154: org-contacts: Fix Agenda format., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts abbf3a9a25 041/154: org-contacts.el: Rename a function to follow emacs-lisp coding conventions, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 5d5faa5e6b 051/154: org-contacts.el, add note property, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 9bd8101c56 059/154: contrib/lisp/org-contacts: Introduce the constant `org-contacts-property-values-separators', ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts beb76bf435 060/154: org-contacts: Use progress-reporter for cache update message, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 9d9246c0a5 072/154: Merge branch 'maint', ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 66e23e6403 008/154: org-contacts: added VCard 3.0 exporter and ADDRESS field, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 4d5b508f0f 007/154: org-contacts: check that completion-at-point-functions is bound, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 531d67a715 014/154: Fix Emacs 24 compatibility issue with Emacs 24,
ELPA Syncer <=
- [elpa] externals/org-contacts 4f5c58197e 006/154: Fix wanderlust interface for org-contact.el, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts d0caf96afd 015/154: Replace org-mode-p with usual (eq major-mode 'org-mode) check, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts ad99d80ad3 001/154: org-contacts: import, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts e585be0859 009/154: org-contacts: added org-contacts-show-map (requires google-maps-el), ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 5f1806a8d0 012/154: org-contacts: fix errors when Gnus or ERC are not loaded, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts c297cb009f 020/154: Merge branch 'maint', ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 1b6cff5ac7 026/154: contrib/lisp/org-contacts.el: Fix indentation of the file, ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts 8bf8565c46 027/154: Update copyright years., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts fb5c9dcec9 043/154: orgcontacts.el: Fix `date' being broken in `org-contacts-anniversaries'., ELPA Syncer, 2022/09/09
- [elpa] externals/org-contacts dcd313e66d 021/154: Tags/properties matcher: Fixed issues with todo-only matches, ELPA Syncer, 2022/09/09