2011-09-07 3 views
4

"zap-to-char"의 새 버전을 작성했습니다. 영역을 강조 표시하는 대신 kill을 선택합니다.이 옵션은 더 유연 할 수 있다고 생각합니다. , 또는 복사하거나이 문자로 이동하십시오. 당신이 보는대로 "문자"를 제외하고 입력을 입력 할 때입력을 푸시하는 Elisp 함수가 필요합니다.

(defun new-zap-to-char (arg char) 
    (interactive "p\ncZap to char: ") 
    (push-mark) 
    (setq mark-active t) 
    (defun iter-zap() 
    (if (< arg 0) 
     (search-forward (char-to-string char) nil nil -1) 
     (search-forward (char-to-string char) nil nil 1)) 
    (if (char-equal char (setq c (read-char))) 
     (iter-zap) 
     (>>>>here is the "push-back-to-input" function"<<<<)) 
(iter-zap)) 

, 나는, 입력에 다시 '읽기 문자를'의 결과를 밀어하는 기능이 필요합니다 여기

은 조각이다. 하지만 Emacs가 제안했는지는 알 수 없습니다. 그래서 네 도움이 필요해.

나는 이것을 분명히하기를 희망한다.

답변

4

unread-command-events을 사용해보십시오. 예를 들어

:

(push ?a unread-command-events) 
+0

덕분에,이 내가 원하는 걸 정말. –

관련 문제