프로세스 출력을 * 메시지 * 버퍼로 전송하지만 에코 영역을 무시하십시오.

프로세스 필터에서 *Messages*버퍼 로 출력을 보내고 에코 영역에 메시지 출력이 나타나는 것을 억제 minibuffer-prompt하여 진행중인 서브 프레스 필터 출력에 의해 지워지지 않고 대화 형 명령을 동시에 사용할 수 있습니까?

(defun rsync-process-filter (proc string)
  (when (not (or
      (string-match "files...\r" string)
      (string-match "files to consider\n" string)))
    (message "%s" string)))

편집 (2015 년 1 월 3 일) : 다음은 비슷한 질문에 대한 링크이지만 정확한 문자열이 알려지지 않은 프로세스 문자열에서 작동하도록 만들 수 없었습니다-스레드의 제목은 다음과 같습니다. Emacs -일부 미니 버퍼 메시지 비활성화 :

/superuser/669701/emacs-disable-some-minibuffer-messages

minibuffer-message-timeout0 으로 설정하여 미니 버퍼에서 표시를 억제 할 수 있습니다 .

예를 들어, 'mode enabled'메시지에 의해 중단되지 않고 미니 버퍼 프롬프트 (예 : ido find-file)에서 마이너 모드를 토글하려는 몇 곳에서 다음과 같은 것을 사용합니다.

(let ((minibuffer-message-timeout 0))
    (toggle-some-mode))

첫 번째 초안 초안 (2015 년 1 월 3 일) : 함수 messages-buffer를 사용하여 적절한 버퍼를 찾거나 작성하는 방법 에 관한 @phils의 유용한 의견을 기반으로 초기 초안을 수정 했습니다 messages-buffer-mode. 그리고 point-max줄의 시작 부분에 있는지 확인하십시오 (그렇지 않으면 메시지 문자열을 삽입하기 전에 새 줄을 삽입하십시오).

편집 (2015 년 1 월 4 일) : 삽입 된 문자열이 반드시 새로운 줄로 끝나는 message것은 아니며 함수 가 새로운 줄의 시작 부분에 있는지 확인하지 않는 상황이 있으므로 처리합니다. 이 기능에서. 따라서, message새로운 라인을 삽입 할 때마다 , 상기 라인은 버퍼의 플러시 좌측에서 시작될 것이다.

(defun rsync-process-filter (proc string)
  (let ((inhibit-read-only t))
    (when (not (or
        (string-match "files...\r" string)
        (string-match "files to consider\n" string)))
      (with-current-buffer (messages-buffer)
        (goto-char (point-max))
        (when (not (bolp))
          (insert "\n"))
        (insert string)
        (when (not (bolp))
          (insert "\n"))))))

docstring을 살펴보면 원하는 내용으로 전화 한 직후 인수로 message메시지를 nil호출 message하여 원하는 것을 얻을 수 있어야합니다 . docstring에서message

첫 번째 인수가 nil이거나 빈 문자열이면 함수는 기존 메시지를 지 웁니다. 미니 버퍼 내용이 표시됩니다.

따라서 함수를 다음과 같이 수정하면 작동합니다.

(defun rsync-process-filter (proc string)
  (when (not (or
      (string-match "files...\r" string)
      (string-match "files to consider\n" string)))
    (message "%s" string)
    (message nil)))

다음을 수행하여 테스트했습니다.

(defun test ()
  (message "%s" "Test")
  (message nil))

(run-at-time 5 5 #'test)

그리고 그것은 작동하는 것 같습니다