helpful

commit 9ce6b1c9c805ae68ed57d711abf344d2f1ce3ce5
parent eae94d82684c2b2addde75b19d564d2e4677d4ca
Author: Wilfred Hughes <me@wilfred.me.uk>
Date:   Sat, 22 Jul 2017 13:11:08 +0100

sort symbol properties

Diffstat:
M
helpful.el
 | 
4
++++

1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/helpful.el b/helpful.el
@@ -69,6 +69,10 @@ This allows us to distinguish strings from symbols."
   "Return a string describing all the properties of SYMBOL."
   (let* ((syms-and-vals
           (-partition 2 (symbol-plist symbol)))
+         (syms-and-vals
+          (-sort (-lambda ((sym1 _) (sym2 _))
+                   (string-lessp (symbol-name sym1) (symbol-name sym2)))
+                 syms-and-vals))
          (lines
           (-map
            (-lambda ((sym val))