[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/marginalia 2da34efdef 2/2: Add symbol class M for modul
From: |
ELPA Syncer |
Subject: |
[elpa] externals/marginalia 2da34efdef 2/2: Add symbol class M for module functions |
Date: |
Fri, 12 May 2023 13:59:10 -0400 (EDT) |
branch: externals/marginalia
commit 2da34efdefc6ae1e0c8a5d52cba10b72945bdc8d
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Add symbol class M for module functions
---
CHANGELOG.org | 6 ++++++
marginalia.el | 6 ++++--
2 files changed, 10 insertions(+), 2 deletions(-)
diff --git a/CHANGELOG.org b/CHANGELOG.org
index c6afaa108c..651f27349b 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -2,6 +2,12 @@
#+author: Omar AntolĂn Camarena, Daniel Mendler
#+language: en
+* Development
+
+- =marginalia-classify-by-prompt=: Use case-insensitive matching.
+- =marginalia-annotate-symbol=: Additional symbol classes. Use =M= for module
+ functions, =P= for primitives and =S= for special forms.
+
* Version 1.2 (2023-04-17)
- =marginalia-classify-by-command-name=: Resolve function aliases and use the
name
diff --git a/marginalia.el b/marginalia.el
index 083fb852fe..3bf0c47b35 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -463,7 +463,8 @@ f function
c command
C interactive-only command
m macro
-M special-form
+F special-form
+M module function
P primitive
g cl-generic
p pure
@@ -497,8 +498,9 @@ t cl-type"
'("c" . "command")))
((cl-generic-p s) '("g" . "cl-generic"))
((macrop (symbol-function s)) '("m" . "macro"))
- ((special-form-p (symbol-function s)) '("M" . "special-form"))
+ ((special-form-p (symbol-function s)) '("F" . "special-form"))
((subr-primitive-p (symbol-function s)) '("P" . "primitive"))
+ ((module-function-p (symbol-function s)) '("M" . "module
function"))
(t '("f" . "function")))
(and (autoloadp (symbol-function s)) '("@" . "autoload"))
(and (marginalia--advised s) '("!" . "advised"))