From: ueno <ueno>
Date: Mon, 24 May 2004 05:22:44 +0000 (+0000)
Subject: * riece-addon.el (riece-command-list-addons): Sort add-ons.
X-Git-Tag: riece-1_0_0~14
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=df804ebef9341ced7b671d5c969a2217e7f43e9f;p=elisp%2Friece.git

* riece-addon.el (riece-command-list-addons): Sort add-ons.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2c0a365..9897def 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-05-24  Daiki Ueno  <ueno@unixuser.org>
+
+	* riece-addon.el (riece-command-list-addons): Sort add-ons.
+
 2004-05-23  Daiki Ueno  <ueno@unixuser.org>
 
 	* riece-menu.el: Don't put 'riece-addon-default-disabled property.
diff --git a/lisp/riece-addon.el b/lisp/riece-addon.el
index 4ceb00e..4379095 100644
--- a/lisp/riece-addon.el
+++ b/lisp/riece-addon.el
@@ -233,7 +233,10 @@ All normal editing commands are turned off."
   (riece-addon-list-mode)
   (let ((inhibit-read-only t)
 	buffer-read-only
-	(pointer riece-addons)
+	(pointer (sort (copy-sequence riece-addons)
+		       (lambda (symbol1 symbol2)
+				  (string-lessp (symbol-name symbol1)
+						(symbol-name symbol2)))))
 	enabled description point)
     (erase-buffer)
     (riece-kill-all-overlays)