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