1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-26 00:01:47 -07:00

Don't bug out in advice--make-docstring when there's not doc string

* lisp/emacs-lisp/nadvice.el (advice--make-docstring): Don't bug
out on functions with no documentation (bug#58284).
This commit is contained in:
Lars Ingebrigtsen 2022-10-04 12:49:49 +02:00
parent 2b2d8ce41e
commit 535eec3bca

View file

@ -157,7 +157,8 @@ DOC is a string where \"FUNCTION\" and \"OLDFUN\" are expected.")
(when before
(insert before)
(ensure-empty-lines 1))
(insert origdoc)
(when origdoc
(insert origdoc))
(when after
(ensure-empty-lines 1)
(insert after))