[elpa] externals/marginalia 060c49d: marginalia--symbol-class: Add pure, side-effect-free and interactive-only

[ELPA Syncer]

branch: externals/marginalia
commit 060c49dc5703dbd54f7323324b86088235848952
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    marginalia--symbol-class: Add pure, side-effect-free and interactive-only
---
 marginalia.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/marginalia.el b/marginalia.el
index 34db149..08ee70c 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -371,7 +371,10 @@ WIDTH is the format width. This can be specified as 
alternative to FORMAT."
 Function:
 f function
 c command
+C interactive-only command
 m macro
+p pure
+s side-effect-free
 ! advised
 - obsolete
 
@@ -391,7 +394,10 @@ t cl-type"
     (when (fboundp s)
       (concat
        (cond
-        ((commandp s) "c")
+        ((get s 'pure) "p")
+        ((get s 'side-effect-free) "s"))
+       (cond
+        ((commandp s) (if (get s 'interactive-only) "C" "c"))
         ((eq (car-safe (symbol-function s)) 'macro) "m")
         (t "f"))
        (and (marginalia--advised s) "!")