awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix #3545: overzealous :pin truncation

Browse Source
This commit is contained in:
Henrik Lissner
2020-07-13 15:51:28 -04:00
parent be8455d67c
commit 946852fe6b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
modules/lang/emacs-lisp/autoload.el
View File

@ -251,7 +251,7 @@ verbosity when editing a file in `doom-private-dir' or `doom-emacs-dir'."
(goto-char (match-beginning 0)) (goto-char (match-beginning 0))
(and (stringp (plist-get (sexp-at-point) :pin)) (and (stringp (plist-get (sexp-at-point) :pin))
(search-forward ":pin" nil t) (search-forward ":pin" nil t)
(let ((start (re-search-forward "\"[^\"]\\{10\\}" nil t)) (let ((start (re-search-forward "\"[^\"\n]\\{10\\}" nil t))
(finish (and (re-search-forward "\"" (line-end-position) t) (finish (and (re-search-forward "\"" (line-end-position) t)
(match-beginning 0)))) (match-beginning 0))))
(when (and start finish) (when (and start finish)