summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-08-18 15:12:55 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-08-18 15:12:55 +0200
commit74e830768dc412b7041e01882efb1a697278d462 (patch)
treef4c7ce4d6602c869a68b0f2118d2bf543652a375 /lisp/emacs-lisp
parent6d38ff1b9e41b1f37bf4a0c64cddfcac64e4c4e7 (diff)
downloademacs-74e830768dc412b7041e01882efb1a697278d462.tar.gz
emacs-74e830768dc412b7041e01882efb1a697278d462.tar.bz2
emacs-74e830768dc412b7041e01882efb1a697278d462.zip
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.
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 8413373e5d4..e13b92bab8c 100644
--- a/lisp/emacs-lisp/loaddefs-gen.el
+++ b/lisp/emacs-lisp/loaddefs-gen.el
@@ -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."