Fix void-function doom--menu-read error in byte-compiled Doom #427

The macro would be expanded, and then its helpers would never be loaded.
This commit is contained in:
Henrik Lissner 2018-02-21 15:32:47 -05:00
parent e6f58d3714
commit fe81a501f3
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -11,11 +11,13 @@ PROMPT (a string) and COMMAND (a list of command plists; see `def-menu!').")
"Default method for displaying a completion-select prompt." "Default method for displaying a completion-select prompt."
(completing-read prompt (mapcar #'car commands))) (completing-read prompt (mapcar #'car commands)))
;;;###autoload
(defun doom--menu-read (prompt commands) (defun doom--menu-read (prompt commands)
(if-let* ((choice (funcall doom-menu-display-fn prompt commands))) (if-let* ((choice (funcall doom-menu-display-fn prompt commands)))
(cdr (assoc choice commands)) (cdr (assoc choice commands))
(user-error "Aborted"))) (user-error "Aborted")))
;;;###autoload
(defun doom--menu-exec (plist) (defun doom--menu-exec (plist)
(let ((command (plist-get plist :exec)) (let ((command (plist-get plist :exec))
(cwd (plist-get plist :cwd))) (cwd (plist-get plist :cwd)))