Organisational commit

Modified input method is the main highlight.
This commit is contained in:
2026-01-09 21:40:51 +09:00
parent 9cd88d6be9
commit f99504e8f0
5 changed files with 122 additions and 32 deletions

View File

@@ -53,7 +53,7 @@
:straight (hbdh :type git :host github :repo "zzhjerry/hbdh-mode")
:config (hbdh-mode))
(defun my/hbdh-highlight-line ()
(defun my-hbdh-highlight-line ()
"Activate hbdh, dim text outside of current line"
(interactive)
(let ((point-beginning (line-beginning-position))
@@ -66,7 +66,7 @@
(setq hbdh-mode-map (make-sparse-keymap))
(define-key hbdh-mode-map "a" 'hbdh-activate-on-region)
(define-key hbdh-mode-map "d" 'hbdh-deactivate)
(define-key hbdh-mode-map "l" 'my/hbdh-highlight-line)
(define-key hbdh-mode-map "l" 'my-hbdh-highlight-line)
(global-set-key "\C-ch" hbdh-mode-map)
@@ -118,4 +118,25 @@
(unless (memq 'vterm features)
(load "vterm" nil t))
;;
(add-to-list 'load-path (expand-file-name (concat minimal-emacs-user-directory "load")))
(register-input-method
"cyrillic-workman" "Russian" 'quail-use-package
"RUW@" "Russian (ЙЦУКЕН) input method simulating Workman keyboard"
"cyrillic-workman-input-method")
;; Reverse-IM creates additional bindings that allow usage of different input
;; methods without changing the keyboard layout (most of the time ,for example:
;; keybinds on russian layout will work with this package).
(use-package reverse-im
:ensure t
:defer nil)
(setq reverse-im-char-fold t) ; use lax matching
(setq reverse-im-read-char-advice-function #'reverse-im-read-char-include)
(setq reverse-im-input-methods '("cyrillic-workman")) ; translate these methods
(reverse-im-mode t)
;;; 05-basic.el ends here