branch: externals/hyperbole
commit c20d2bfeb2546ca94b2685ae63be4dc1fb8f805e
Author: Mats Lidell <[email protected]>
Commit: GitHub <[email protected]>
Remove byte compile support for Emacs older than 28 (#884)
* hload-path.el (hload-path--make-directory-autoloads): Use Emacs provided
byte compilation functions.
(hload-path--internal-make-directory-autoloads): Removed, not required
from
Emacs 28.
---
ChangeLog | 7 +++++++
hload-path.el | 23 +++--------------------
2 files changed, 10 insertions(+), 20 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 5e483518cc..37a2367ab9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2026-03-03 Mats Lidell <[email protected]>
+
+* hload-path.el (hload-path--make-directory-autoloads): Use Emacs provided
+ byte compilation functions.
+ (hload-path--internal-make-directory-autoloads): Removed, not required from
+ Emacs 28.
+
2026-03-02 Mats Lidell <[email protected]>
* hywiki.el (consult--async-command):
diff --git a/hload-path.el b/hload-path.el
index e2ac08ae27..1ca8dccc1a 100644
--- a/hload-path.el
+++ b/hload-path.el
@@ -87,30 +87,13 @@ directory separator character.")
;;; Autoloads
;;; ************************************************************************
-;; New autoload generation function defined only as of Emacs 28
(defalias 'hload-path--make-directory-autoloads
(cond ((fboundp 'loaddefs-generate)
#'loaddefs-generate)
- ((fboundp #'make-directory-autoloads)
- #'make-directory-autoloads)
(t
- #'hload-path--internal-make-directory-autoloads)))
-
-(defun hload-path--internal-make-directory-autoloads (dir output-file)
- "Update autoload definitions for Lisp files in the directories DIRS.
-DIR can be either a single directory or a list of
-directories. (The latter usage is discouraged.)
-
-The autoloads will be written to OUTPUT-FILE. If any Lisp file
-binds `generated-autoload-file' as a file-local variable, write
-its autoloads into the specified file instead.
-
-The function does NOT recursively descend into subdirectories of the
-directory or directories specified."
- ;; Don't use a 'let' on this next line or it will fail.
- (setq generated-autoload-file output-file)
- (with-suppressed-warnings ((obsolete update-directory-autoloads))
- (update-directory-autoloads dir)))
+ #'make-directory-autoloads))
+ "Use `loaddefs-generate' if available or fallback to
`make-directory-autoloads'.
+`make-directory-autoloads' is defined since Emacs 28.")
;; Menu items could call this function before Info is loaded.
(autoload 'Info-goto-node "info" "Jump to specific Info node." t)
