Make GEN message from loaddefs-generate nicer

* lisp/emacs-lisp/loaddefs-gen.el (loaddefs-generate): Shorten the
informational GEN file relative to the stated directory
(bug#57265).  This makes the message nicer for ELPA packages.
This commit is contained in:
Lars Ingebrigtsen 2022-08-18 15:12:55 +02:00
parent 6d38ff1b9e
commit 74e830768d

View file

@ -645,7 +645,8 @@ instead of just updating them with the new/changed autoloads."
(unless (equal (buffer-hash) hash)
(write-region (point-min) (point-max) loaddefs-file nil 'silent)
(byte-compile-info
(file-relative-name loaddefs-file lisp-directory) t "GEN"))))))))
(file-relative-name loaddefs-file (car (ensure-list dir)))
t "GEN"))))))))
(defun loaddefs-generate--print-form (def)
"Print DEF in a format that makes sense for version control."