mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Pass lazy doc string to 'defalias'
* lisp/emacs-lisp/bytecomp.el (byte-compile-file-form-defalias): We correctly emit a lazy-loaded doc string but then passed a literal string to 'defalias' by mistake; fix that. Saves 40 KiB in .elc files.
This commit is contained in:
parent
c1029c88a8
commit
ae7761598d
1 changed files with 2 additions and 1 deletions
|
|
@ -5141,7 +5141,8 @@ binding slots have been popped."
|
|||
(when (stringp doc)
|
||||
(setq rest (byte-compile--list-with-n
|
||||
rest 0
|
||||
(byte-compile--docstring doc (nth 0 form) name)))))
|
||||
(byte-compile--docstring doc (nth 0 form) name)))
|
||||
(setq form (nconc (take 3 form) rest))))
|
||||
(pcase-let*
|
||||
;; `macro' is non-nil if it defines a macro.
|
||||
;; `fun' is the function part of `arg' (defaults to `arg').
|
||||
|
|
|
|||
Loading…
Reference in a new issue