From: Daiki Ueno <ueno@unixuser.org>
Date: Fri, 26 Aug 2005 06:07:55 +0000 (+0000)
Subject: Sort add-ons.
X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=commitdiff_plain;h=dd44a39754ef0c4725e95b1cd808ab21178ddc79

Sort add-ons.
---

diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index eee7d64..29a5e08 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -303,7 +303,10 @@ All normal editing commands are turned off."
       (setq pointer (cdr pointer)))
     (erase-buffer)
     (riece-kill-all-overlays)
-    (setq pointer module-description-alist)
+    (setq pointer (sort module-description-alist
+			(lambda (entry1 entry2)
+			  (string-lessp (symbol-name (car entry1))
+					(symbol-name (car entry2))))))
     (while pointer
       (setq enabled (intern-soft (concat (symbol-name (car (car pointer)))
 					 "-enabled")))
@@ -326,7 +329,7 @@ Symbols in the leftmost column:
   +     The add-on is enabled.
   -     The add-on is disabled.
   !	The add-on doesn't support enable/disable operation.
-  ?	The add-on status is unknown.
+  ?	The add-on is not loaded.
 ")
     (insert (substitute-command-keys "
 Useful keys: