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

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

[elpa] externals/org-contacts 39c7aba7dc 127/154: Remove all-completions


From: ELPA Syncer
Subject: [elpa] externals/org-contacts 39c7aba7dc 127/154: Remove all-completions code logic
Date: Fri, 9 Sep 2022 15:58:54 -0400 (EDT)

branch: externals/org-contacts
commit 39c7aba7dc5abb8f5475d1f8ef45a797906cc78b
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>

    Remove all-completions code logic
---
 org-contacts.el | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index 7f819df441..7a4faaf581 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -681,20 +681,10 @@ Usage: (add-hook 'completion-at-point-functions 
'org-contacts-org-complete-funct
   (when-let* ((end (point))
               (begin (save-excursion (skip-chars-backward "[:alnum:]@") 
(point)))
               (symbol (buffer-substring-no-properties begin end))
-              (org-contacts-prefix-p (string-prefix-p "@" symbol))
-              ;; (prefix (substring-no-properties symbol 1 nil))
-              )
+              (org-contacts-prefix-p (string-prefix-p "@" symbol)))
     (when org-contacts-prefix-p
       (list begin
             end
-            
-            ;; (all-completions
-            ;;  prefix
-            ;;  (mapcar
-            ;;   (lambda (contact) (plist-get contact :name))
-            ;;   (org-contacts--all-contacts))
-            ;;  'stringp)
-
             (completion-table-dynamic
              (lambda (_)
                (mapcar



reply via email to

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