From e98999f470f28f80dbd7e701554025531af72371 Mon Sep 17 00:00:00 2001
From: taku0 <mxxouy6x3m_github@tatapa.org>
Date: Thu, 30 Jul 2026 21:03:52 +0900
Subject: [PATCH] Fix skk-show-mode cannot disabled

Once skk-show-mode is enabled, the tooltip is always displayed when toggling
between hiragana mode and katakana mode, even if skk-show-mode is disabled.
---
 skk.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/skk.el b/skk.el
index 95de3aaf..94e1c541 100644
--- a/skk.el
+++ b/skk.el
@@ -937,7 +937,8 @@ Delete Selection $B%b!<%I$,(B SKK $B$r;H$C$?F|K\8lF~NO$KBP$7$F$b5!G=$9$k$h$&$
 $B"&%b!<%I$G$O(B `skk-henkan-start-point' ($B"&$ND>8e(B) $B$H%+!<%=%k$N4V$NJ8;zNs$K$D$$(B
 $B$F!"$R$i$,$J$H%+%?%+%J$rF~$lBX$($k!#(B"
   (interactive "P")
-  (let ((show skk-show-mode-enable))    ;$B%A%e!<%H%j%"%k<B9TCf$N$_(B nil
+  (let ((show (and skk-show-mode-show
+                   skk-show-mode-enable)))    ;$B%A%e!<%H%j%"%k<B9TCf$N$_(B nil
     (cond
      ((eq skk-henkan-mode 'on)      ;$B"&%b!<%I(B
       (let (char-type)