From 31f93da3fd7467476cc153e414ac5adcb502a952 Mon Sep 17 00:00:00 2001 From: Akib Azmain Turja Date: Tue, 29 Nov 2022 00:28:03 +0600 Subject: [PATCH] * eat.el (eat-mode): Fix char mode 'help-echo' --- eat.el | 19 ++++++++----------- 1 file changed, 8 insertions(+), 11 deletions(-) diff --git a/eat.el b/eat.el index 3c91ded..db4db4b 100644 --- a/eat.el +++ b/eat.el @@ -5524,12 +5524,11 @@ END if it's safe to do so." (when eat--process (cond (eat--semi-char-mode - `("[" + '("[" (:propertize "semi-char" - help-echo - ,(concat "mouse-1: Switch to char mode, " - "mouse-3: Switch to emacs mode") + help-echo "mouse-1: Switch to char mode, \ +mouse-3: Switch to emacs mode" mouse-face mode-line-highlight local-map (keymap @@ -5542,9 +5541,8 @@ END if it's safe to do so." '("[" (:propertize "char" - help-echo - ,(concat "mouse-1: Switch to semi-char mode, " - "mouse-3: Switch to emacs mode") + help-echo "mouse-1: Switch to semi-char mode, \ +mouse-3: Switch to emacs mode" mouse-face mode-line-highlight local-map (keymap @@ -5554,12 +5552,11 @@ END if it's safe to do so." (down-mouse-3 . eat-emacs-mode))))) "]")) (t - `("[" + '("[" (:propertize "emacs" - help-echo - ,(concat "mouse-1: Switch to semi char mode, " - "mouse-3: Switch to char mode") + help-echo "mouse-1: Switch to semi char mode, \ +mouse-3: Switch to char mode" mouse-face mode-line-highlight local-map (keymap