branch: externals/compat
commit cee20442b3dddf5cf0fdeb12409d024e4453a8cb
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
compat-28: Drop make-directory-autoloads
This command has been added in 28.1 and deprecated in 29.1. It was
untested in compat.el all along.
---
compat-28.el | 23 -----------------------
compat.texi | 6 ------
2 files changed, 29 deletions(-)
diff --git a/compat-28.el b/compat-28.el
index d4bf81142a..ce41338248 100644
--- a/compat-28.el
+++ b/compat-28.el
@@ -779,29 +779,6 @@ itself will be used instead as the function argument."
'keymap button-map
'action callback))
-;;;; Defined in autoload.el
-
-(defvar generated-autoload-file)
-
-(compat-defun make-directory-autoloads (dir output-file) ;; <UNTESTED>
- "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."
- (let ((generated-autoload-file output-file))
- ;; We intentionally don't sharp-quote
- ;; `update-directory-autoloads', because it was deprecated in
- ;; Emacs 28 and we don't want to trigger the byte compiler for
- ;; newer versions.
- (apply 'update-directory-autoloads
- (if (listp dir) dir (list dir)))))
-
;;;; Defined in time-data.el
(compat-defun decoded-time-period (time) ;; <OK>
diff --git a/compat.texi b/compat.texi
index 166d1d9218..5ee16cf51e 100644
--- a/compat.texi
+++ b/compat.texi
@@ -1785,12 +1785,6 @@ If non-@code{nil}, the argument @var{help-echo} will be
used to set the
@code{help-echo} text property.
@end defun
-@c based on lisp/emacs-lisp/autoload.el
-@defun make-directory-autoloads dir output-file
-Parse and search the directory @var{dir} for autoload definitions, and
-write the processed results to the file @var{output-file}.
-@end defun
-
@c based on src/xfaces.c
@defun color-values-from-color-spec spec
Convert the textual color specification @var{spec} to a color triple
