emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/jit-spell 2d0420f2f3: Simplify mode line indicator


From: ELPA Syncer
Subject: [elpa] externals/jit-spell 2d0420f2f3: Simplify mode line indicator
Date: Sun, 26 Mar 2023 10:58:44 -0400 (EDT)

branch: externals/jit-spell
commit 2d0420f2f3104caaf64c208fbffeded06faef2c0
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Simplify mode line indicator
---
 jit-spell.el | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/jit-spell.el b/jit-spell.el
index ca576916fb..179bee7d41 100644
--- a/jit-spell.el
+++ b/jit-spell.el
@@ -575,14 +575,9 @@ It can also be bound to a mouse click to pop up the menu."
   :lighter (" Spell"
             (:propertize
              (:eval
-             (concat "/" (let ((s (or ispell-local-dictionary
-                                      ispell-dictionary
-                                       "--")))
-                            (substring s 0 (string-search "_" s)))))
-             help-echo "mouse-1: Change dictionary"
-             local-map (keymap
-                        (mode-line keymap
-                                   (mouse-1 . ispell-change-dictionary)))))
+              (when-let ((s (or ispell-local-dictionary
+                               ispell-dictionary)))
+                (concat "/" (substring s 0 (string-search "_" s)))))))
   (cond
    (jit-spell-mode
     ;; Major mode support



reply via email to

[Prev in Thread] Current Thread [Next in Thread]