[elpa] externals/embark 8cb3f7655a: Recognize interned Emacs Lisp symbols in all non-prog modes

[ELPA Syncer]

branch: externals/embark
commit 8cb3f7655a7868cebe756c1f6c9f2d07ca4da5d4
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>

    Recognize interned Emacs Lisp symbols in all non-prog modes
---
 embark.el | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/embark.el b/embark.el
index 867a0ba950..36ec95979e 100644
--- a/embark.el
+++ b/embark.el
@@ -905,10 +905,9 @@ in one of those major modes."
 In Emacs Lisp and IELM buffers the identifier is promoted to a
 symbol, for which more actions are available.  Identifiers are
 also promoted to symbols if they are interned Emacs Lisp symbols
-and found in a buffer in a major mode derived from
-`special-mode', `Info-mode', `Custom-mode' or `text-mode' (these
-are intended to cover cases where you might be reading or writing
-about Emacs).
+and found in a buffer in a major mode that is not derived from
+`prog-mode' (this is intended for when you might be reading or
+writing about Emacs).
 
 As a convenience, in Org Mode an initial ' or surrounding == or
 ~~ are removed."
@@ -923,9 +922,7 @@ As a convenience, in Org Mode an initial ' or surrounding 
== or
                (cl-incf (car bounds))
                (cl-decf (cdr bounds)))))
       `(,(if (or (derived-mode-p 'emacs-lisp-mode 'inferior-emacs-lisp-mode)
-                 (and (intern-soft name)
-                      (derived-mode-p
-                       'special-mode 'Info-mode 'Custom-mode 'text-mode)))
+                 (and (intern-soft name) (not (derived-mode-p 'prog-mode))))
              'symbol
            'identifier)
         ,name