답변:
바인딩 message-log-max
에 nil
:
(defun foo ()
(interactive)
(let ((message-log-max nil))
(message "EEEEEEEEEEEEEEEEEE")))
M-x foo RET
[PS 는 sexp 를 평가하는 것의 메시지가에 의해 출력 된 메시지라고 M-: (let ((message-log-max nil)) (message "EEEEEEEEEEEEEEEEEE"))
생각하는 것과 같은 것을 사용하는 테스트에 의해 오도되지 않습니다 . 대신 해당 평가에서 반환 된 값입니다. is 인 경우 아무것도 기록하지 않습니다 .]EEEEEEEEEEEEEEEEEE
let
message
message
*Messages*
message-log-max
nil
그것을 할 수있는 방법을 찾을 수 없었기 때문에이 이상한 기능을 해킹했습니다.
(defun echo-and-ignore-message-buffer (message)
(let ((prev-msg-log-max message-log-max))
(unwind-protect
(progn (setq message-log-max nil)
(message message))
(setq message-log-max prev-msg-log-max))))
에 대한 설명서를 확인하십시오 message-log-max
.