branch: elpa/xah-fly-keys
commit 9f7e54a3819ffbad9324194ca3c85a4c44582580
Author: Xah Lee <x...@xahlee.org>
Commit: Xah Lee <x...@xahlee.org>

    new variable xah-fly-command-mode-hl-line. If true, highlight current line 
when in command mode. by default it is on.
---
 xah-fly-keys.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/xah-fly-keys.el b/xah-fly-keys.el
index 5fa4905c5b..2be6a36cf6 100644
--- a/xah-fly-keys.el
+++ b/xah-fly-keys.el
@@ -4,7 +4,7 @@
 
 ;; Author: Xah Lee ( http://xahlee.info/ )
 ;; Maintainer: Xah Lee <x...@xahlee.org>
-;; Version: 27.5.20250719153805
+;; Version: 27.6.20250719194527
 ;; Created: 2013-09-10
 ;; Package-Requires: ((emacs "28.3"))
 ;; Keywords: convenience, vi, vim, ergoemacs, keybinding
@@ -188,6 +188,11 @@ Must be set before loading xah-fly-keys."
 Must be set before loading xah-fly-keys."
  :type 'boolean)
 
+(defcustom xah-fly-command-mode-hl-line t
+ "If true, highlight current line when in command mode.
+Must be set before loading xah-fly-keys."
+ :type 'boolean)
+
 ;; HHHH------------------------------
 ;; cursor movement
 
@@ -4055,6 +4060,7 @@ Version: 2022-07-06"
 Version: 2017-07-07"
   (interactive)
   (xah-fly-command-mode-init)
+  (when xah-fly-command-mode-hl-line (progn (global-hl-line-mode 1)))
   (run-hooks 'xah-fly-command-mode-activate-hook))
 
 (defun xah-fly-command-mode-activate-no-hook ()
@@ -4068,6 +4074,7 @@ Version: 2017-07-07"
 Version: 2017-07-07"
   (interactive)
   (xah-fly-insert-mode-init)
+  (when xah-fly-command-mode-hl-line (progn (global-hl-line-mode 0)))
   (run-hooks 'xah-fly-insert-mode-activate-hook))
 
 (defun xah-fly-insert-mode-activate-newline ()

Reply via email to