migemo

consult-ripgrep と migemo を組み合わせて ripgrep でもローマ字日本語検索 の派生。 TL;DR ;; -*- lexical-binding: t -*- (defun consult--migemo-regexp-compiler (input type) (setq input (mapcar #'migemo-get-pattern (consult--split-escaped input))) (cons (mapcar (lambda (x) (consult--convert-regexp x type)) input) (when-let (regexps (seq-filter #'consult--valid-regexp-p input)) (lambda (str) (consult--highlight-regexps regexps str))))) (setq migemo-options '("--quiet" "--nonewline" "--emacs")) (setq consult--regexp-compiler #'consult--migemo-regexp-compiler) Lexical Binding

TL;DR (require 'avy) (require 'migemo) (defun avy-goto-migemo-timer (&optional arg) (interactive "P") (let ((avy-all-windows (if arg (not avy-all-windows) avy-all-windows))) (avy-with avy-goto-migemo-timer (setq avy--old-cands (avy--read-candidates #'migemo-get-pattern)) (avy-process avy--old-cands)))) (add-to-list 'avy-styles-alist '(avy-goto-migemo-timer . pre)) (global-set-key (kbd "C-M-'") 'avy-goto-migemo-timer) 背景 以前の記事 を書いた時点では avy を使っていなかったが、改めて調べると超

Ivy (Swiper) で雑に migemo を使う の続編。併せて参照のコト。 TL;DR (setq migemo-options '("--quiet" "--nonewline" "--emacs")) (setq ivy-re-builders-alist '((t . ivy--regex-plus) (counsel-rg . ytn-ivy-migemo-re-builder) (swiper . ytn-ivy-migemo-re-builder))) counsel-rg の仕組み Emacs で使える正規表現と rg に渡せる正規表現は異なるのに、

2021年2月27日 最終更新 counsel-rg と migemo を組み合わせて ripgrep でもローマ字検索 も併せて参照。 TL;DR (reqiure 'dash) (require 's) (defun ytn-ivy-migemo-re-builder (str) (let* ((sep " \\|\\^\\|\\.\\|\\*") (splitted (--map (s-join "" it) (--partition-by (s-matches-p " \\|\\^\\|\\.\\|\\*" it) (s-split "" str t))))) (s-join "" (--map (cond