From 58edab6f69f8a48f47a9ec391375ed36655306e7 Mon Sep 17 00:00:00 2001
From: stardiviner <numbchild@gmail.com>
Date: Thu, 18 Nov 2021 22:23:23 +0800
Subject: [PATCH] Add autoload cookirs for completing functions

---
 org-contacts.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/org-contacts.el b/org-contacts.el
index d9d9e2b..72ea8f9 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -626,11 +626,13 @@ description."
                  (run-hook-with-args-until-success
                   'org-contacts-complete-functions string))))))))
 
+;;;###autoload
 (defun org-contacts-org-complete--annotation-function (candidate)
   "Return org-contacts tags of contact candidate."
   ;; TODO
   "Tags: ")
 
+;;;###autoload
 (defun org-contacts-org-complete--doc-function (candidate)
   "Return org-contacts content of contact candidate."
   (let* ((candidate (substring-no-properties candidate 1 nil))
@@ -663,6 +665,7 @@ description."
         (org-show-all)))
     doc-buffer))
 
+;;;###autoload
 (defun org-contacts-org-complete--location-function (candidate)
   "Return org-contacts location of contact candidate."
   (let* ((candidate (substring-no-properties candidate 1 nil))
@@ -676,6 +679,7 @@ description."
       (goto-char position)
       (cons (current-buffer) position))))
 
+;;;###autoload
 (defun org-contacts-org-complete-function ()
   "Function used in `completion-at-point-functions' in `org-mode' to complete @name.
 Usage: (add-hook 'completion-at-point-functions 'org-contacts-org-complete-function nil 'local)"