diff options
| author | Wilfred Hughes <me@wilfred.me.uk> | 2017-07-22 13:11:08 +0100 |
|---|---|---|
| committer | Wilfred Hughes <me@wilfred.me.uk> | 2017-07-22 13:11:08 +0100 |
| commit | 9ce6b1c9c805ae68ed57d711abf344d2f1ce3ce5 (patch) | |
| tree | d9a48d450d96fedee5163d535d6709053c763db3 | |
| parent | eae94d82684c2b2addde75b19d564d2e4677d4ca (diff) | |
sort symbol properties
| -rw-r--r-- | helpful.el | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -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)) |
