[elpa] externals/guess-language d5d966e 059/101: Show current language in the mode line.

[Stefan Monnier]

branch: externals/guess-language
commit d5d966e2130aefc425d1b58eb835a94cf9d76759
Author: Joost Kremers <address@hidden>
Commit: Joost Kremers <address@hidden>

    Show current language in the mode line.
---
 guess-language.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guess-language.el b/guess-language.el
index 3810f74..59396a7 100644
--- a/guess-language.el
+++ b/guess-language.el
@@ -202,7 +202,7 @@ correctly."
   ;; The initial value.
   :init-value nil
   ;; The indicator for the mode line.
-  :lighter " Guess-lang"
+  :lighter '(:eval (format " (%s)" (or ispell-local-dictionary "default")))
   :global nil
   :group 'guess-language
   (if guess-language-mode