changeset 65376:22f4c45c6f2f

(describe-property-list): Handle non-symbol prop names.
author Richard M. Stallman <rms@gnu.org>
date Fri, 09 Sep 2005 01:10:41 +0000
parents 0f39e01da672
children 745b7454f9cc
files lisp/descr-text.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/descr-text.el	Thu Sep 08 22:57:16 2005 +0000
+++ b/lisp/descr-text.el	Fri Sep 09 01:10:41 2005 +0000
@@ -108,7 +108,8 @@
 		       (while properties
 			 (push (list (pop properties) (pop properties)) ret))
 		       ret)
-		     (lambda (a b) (string< (nth 0 a) (nth 0 b)))))
+		     (lambda (a b) (string< (prin1-to-string (nth 0 a) t)
+					    (prin1-to-string (nth 0 b) t)))))
     (let ((key (nth 0 elt))
 	  (value (nth 1 elt)))
       (widget-insert (propertize (format "  %-20s " key)