[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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/jit-spell 2d0420f2f3: Simplify mode line indicator,
ELPA Syncer <=