(update-autoloads-from-directories): Sort the list of files with no

autoloads.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 48b4f5132c25f502b66c38ef038db0cc677924bb..0809523177afb0dab9edbf7a1a64d00f5eedfecb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-11-16   Markus Rost  <rost@math.ohio-state.edu>
+
+       * emacs-lisp/autoload.el (update-autoloads-from-directories):
+       Sort the list of files with no autoloads.
+
 2002-08-23  Alan Shutko  <ats@acm.org>
 
        * calendar/diary-lib.el (list-diary-entries): Pass a marker

diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el
index 0503d908fdd27b86fe3b1d2e67af2967d9ec8841..2dd909681cab43ee222514c1a3d175770008823d 100644 (file)
--- a/lisp/emacs-lisp/autoload.el
+++ b/lisp/emacs-lisp/autoload.el
@@ -537,6 +537,8 @@ This uses `update-file-autoloads' (which see) do its work."
            (append no-autoloads
                    (delq nil (mapcar 'update-file-autoloads files))))
       (when no-autoloads
+       ;; Sort them for better readability.
+       (setq no-autoloads (sort no-autoloads 'string<))
        ;; Add the `no-autoloads' section.
        (goto-char (point-max))
        (search-backward "\f" nil t)