Call customized function correctly

ref #90

Author: maw

zetteldeft.org

@@ -738,7 +738,7 @@ Based on =deft-find-file=.
 (defun zetteldeft-find-file (file)
   "Open deft file FILE."
   (interactive
-    (list (zetteldeft-completing-read "Deft find file: "
+    (list (funcall zetteldeft-completing-read "Deft find file: "
             (deft-find-all-files-no-prefix))))
   (deft-find-file file))
 #+END_SRC
@@ -781,7 +781,7 @@ Based on =deft-find-file=.
 (defun zetteldeft-find-file-id-insert (file)
   "Find deft file FILE and insert a link."
   (interactive (list
-    (zetteldeft-completing-read "File to insert id from: "
+    (funcall zetteldeft-completing-read "File to insert id from: "
       (deft-find-all-files-no-prefix))))
   (insert (concat zetteldeft-link-indicator
                   (zetteldeft--lift-id file)
@@ -811,7 +811,7 @@ Include the prefix on a new line after the title, and add ID and title.
 Finds the title line, and adds `backlink-prefix' with
 ID and title on a new line."
   (interactive (list
-    (zetteldeft-completing-read "File to add backlink to: "
+    (funcall zetteldeft-completing-read "File to add backlink to: "
       (deft-find-all-files-no-prefix))))
   (save-excursion
     (goto-char (point-min))
@@ -844,7 +844,7 @@ Based on =deft-find-file=.
 (defun zetteldeft-find-file-full-title-insert (file)
   "Find deft file FILE and insert a link with title."
   (interactive (list
-    (zetteldeft-completing-read "File to insert full title from: "
+    (funcall zetteldeft-completing-read "File to insert full title from: "
       (deft-find-all-files-no-prefix))))
   (insert zetteldeft-link-indicator
           (zetteldeft--lift-id file)
@@ -2051,7 +2051,7 @@ When called interactively, select a file from the completion interface.
 (defun zetteldeft-org-graph-note (deftFile)
   "Create a graph starting from note DEFTFILE."
   (interactive (list
-    (zetteldeft-completing-read "Note to start graph from: "
+    (funcall zetteldeft-completing-read "Note to start graph from: "
       (deft-find-all-files))))
   (setq zetteldeft--graph-links (list))
   (insert zetteldeft-graph-syntax-begin)