Index: /trunk/source/contrib/foy/cl-documentation-cm/cl-documentation-2.lisp
===================================================================
--- /trunk/source/contrib/foy/cl-documentation-cm/cl-documentation-2.lisp	(revision 12737)
+++ /trunk/source/contrib/foy/cl-documentation-cm/cl-documentation-2.lisp	(revision 12738)
@@ -86,5 +86,7 @@
         (push sym miscellaneous)))
     (dotimes (idx letter-array-length)
-      (let ((submenu-item (make-submenu-item (elt *ABCs* idx) (coerce (aref letter-array idx) 'list))))
+      (let ((submenu-item (make-submenu-item (elt *ABCs* idx) 
+                                             (sort (coerce (aref letter-array idx) 'list)
+                                                   #'string> :key #'string))))
         (#/addItem: menu submenu-item)))
     (when miscellaneous