fix(emacs-lisp): +emacs-lisp--module-at-point: wrong-number-of-arguments error

This commit is contained in:
Henrik Lissner 2024-03-11 19:14:14 -04:00
parent 90f90fb34d
commit 4af536cde2
No known key found for this signature in database
GPG key ID: B60957CA074D39A3

View file

@ -66,7 +66,7 @@ Intended to replace `lisp-outline-level'."
(re-search-backward
"\\_<:\\(?:\\sw\\|\\s_\\)+\\_>" ;; Find a keyword.
doom-start 'noerror))
(unless (looking-back "(")
(unless (looking-back "(" (bol))
(let ((kw-syntax (syntax-ppss)))
(when (and (= (ppss-depth kw-syntax) doom-depth)
(not (ppss-string-terminator kw-syntax))