プログラムによる対話式正規表現検索の開始

Question

定義済みの正規表現を使用してisearch-forward-regexpを開始するコマンドを定義したいとします。

「aaa」または「bbb」のすべての出現を検索したいとします。私がisearch-forward-regexpと対話的に入力できる正規表現は、\\(aaa\\|bbb\\)

です。対話的にregexpを入力しないと、これを行う方法はありますか？私はこのようなものを試してみた：

(defun my-search() 
(interactive) 
(isearch-mode t t) 
(isearch-yank-string "\\(aaa\\|bbb\\)")) 

しかしisearchにヤンクとき\\(aaa\\|bbb\\)に評価emacsの中の文字列を定義するためにどのような方法があるようには思えないので、このアプローチは動作するようには思えません。

たとえば、は、(aaaと評価されますが、"\\\\(aaa"は、\\\\(aaaと評価されます。単一のバックスラッシュを評価する方法はないようです。

私がしたいことをする方法はありますか？例えば

(defun foo (regexp) 
    (interactive (list (read-regexp "Regexp: "))) 
    (isearch-mode t t) 
    (let ((isearch-regexp nil)) 
    (isearch-yank-string regexp))) 

：M-x foo RET、その後、\(aaa\|bbb\) RETを入力

Answer 1

このコマンドは、私はあなたが求めていると思う何をすべき。

インタラクティブではなくLispから呼び出す場合は、必要な正規表現を文字列として入力してください。たとえば、次のように文字列の正規表現の特殊文字を引用防ぐために：fooはisearch-yank-stringへの呼び出しの周りnilにisearch-regexpをバインドする理由です

(if isearch-regexp (setq string (regexp-quote string))) 

：isearch-yank-stringがこれを行うこと

(foo "\\(aaa\\|bbb\\)") 

注意。