summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2022-08-05 20:17:23 +0200
committerStefan Kangas <stefan@marxist.se>2022-08-05 20:17:23 +0200
commitea6c2e92958a10c7fd6b250f40fec66ac54a59ff (patch)
tree49bd320bf04a4c8f01c70eba96c743bb1c8ba2b2 /lisp/emacs-lisp
parent50730a8b04ede381c958600a1400efe8d04d9dfc (diff)
downloademacs-ea6c2e92958a10c7fd6b250f40fec66ac54a59ff.tar.gz
emacs-ea6c2e92958a10c7fd6b250f40fec66ac54a59ff.tar.bz2
emacs-ea6c2e92958a10c7fd6b250f40fec66ac54a59ff.zip
Allow newline after def*-form for definition-prefix
* lisp/emacs-lisp/loaddefs-gen.el (autoload-ignored-definitions): Add another semantic function. (loaddefs-generate--compute-prefixes): Allow newline after the "(def*" form. (Bug#57000)
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/loaddefs-gen.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/loaddefs-gen.el b/lisp/emacs-lisp/loaddefs-gen.el
index afba9f8fbc7..8aa17be765e 100644
--- a/lisp/emacs-lisp/loaddefs-gen.el
+++ b/lisp/emacs-lisp/loaddefs-gen.el
@@ -68,6 +68,7 @@ be included.")
"define-short-documentation-group"
"def-edebug-elem-spec"
"defvar-mode-local"
+ "defcustom-mode-local-semantic-dependency-system-include-path"
"define-ibuffer-column"
"define-ibuffer-sorter")
"List of strings naming definitions to ignore for prefixes.
@@ -456,7 +457,7 @@ don't include."
(let ((prefs nil))
;; Avoid (defvar <foo>) by requiring a trailing space.
(while (re-search-forward
- "^(\\(def[^ \t]+\\)[ \t]+['(]*\\([^' ()\"\n]+\\)[\n \t]" nil t)
+ "^(\\(def[^ \t\n]+\\)[ \t\n]+['(]*\\([^' ()\"\n]+\\)[\n \t]" nil t)
(unless (member (match-string 1) autoload-ignored-definitions)
(let ((name (match-string-no-properties 2)))
(when (save-excursion