[elpa] externals/org-contacts c98281fcfe 113/154: Remove compatibility code

[ELPA Syncer]

branch: externals/org-contacts
commit c98281fcfe863de280d3c385a56cfc8cb16e064c
Author: Morgan Smith <Morgan.J.Smith@outlook.com>
Commit: stardiviner <numbchild@gmail.com>

    Remove compatibility code
---
 org-contacts.el | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index 5d54325fd3..7be845af24 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -340,13 +340,6 @@ cell corresponding to the contact properties.
                                    (or (cdr (assoc-string "ALLTAGS" (caddr 
contact))) "") ":"))))
             collect contact)))
 
-(when (not (fboundp 'completion-table-case-fold))
-  ;; That function is new in Emacs 24...
-  (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-try-completion-prefix (to-match collection &optional 
predicate)
   "Custom implementation of `try-completion'.
 This version works only with list and alist and it looks at all