프로그래밍 방식으로 대화 형 regexp 검색 시작

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\\)로 평가 이맥스에 문자열을 정의 할 수있는 방법이있을 것 같지 않기 때문에이 방법은 작동하지 않습니다.

예를 들어 "\\(aaa"은 (aaa으로 평가되지만, "\\\\(aaa"은 \\\\(aaa으로 평가됩니다. 하나의 백 슬래시로 평가할 방법이없는 것 같습니다.

내가 원하는 것을 할 수있는 방법이 있습니까? 다음, M-x foo RET\(aaa\|bbb\) RET를 입력 : 예를 들어

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

:

Answer 1

이 명령을 요구하고 내가 무엇을 생각해야한다.

대화식 대신 Lisp에서 호출하는 경우 원하는 정규 표현식을 문자열로 제공하십시오. isearch-yank-string는이 작업을 수행

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

하는 것으로 : 예를 들어 foo가 결합하는 이유

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

는 isearch-regexpisearch-yank-string에 대한 호출 주위 nil에 : 문자열에서 정규 표현식 특수 문자를 인용 방지합니다.