The byte-compiler ate my baby

This commit is contained in:
Henrik Lissner 2020-02-06 15:30:50 -05:00
parent 7afa8a7e90
commit 1910453e29
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
6 changed files with 36 additions and 40 deletions

View file

@ -88,7 +88,7 @@ library/userland functions"
((and (symbolp (setq module (sexp-at-point)))
(string-prefix-p "+" (symbol-name module)))
(while (symbolp (sexp-at-point))
(beginning-of-sexp))
(thing-at-point--beginning-of-sexp))
(setq flag module
module (car (sexp-at-point)))
(when (re-search-backward "\\_<:\\w+\\_>" nil t)
@ -99,7 +99,7 @@ library/userland functions"
(list category module flag))))))))
;;;###autoload
(defun +emacs-lisp-lookup-definition (thing)
(defun +emacs-lisp-lookup-definition (_thing)
"Lookup definition of THING."
(if-let (module (+emacs-lisp--module-at-point))
(doom/help-modules (car module) (cadr module) 'visit-dir)