From: Markus Rost <rost@math.uni-bielefeld.de>
Date: Sat, 16 Nov 2002 22:41:33 +0000 (+0000)
Subject: (update-autoloads-from-directories):  Sort the list of files with no
X-Git-Tag: ttn-vms-21-2-B4~12416
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=000d99237f9bf9d9327dc7a89808e0b48edc1b06;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 48b4f5132c2..0809523177a 100644
--- 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 0503d908fdd..2dd909681ca 100644
--- 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)