LINUX.ORG.RU

История изменений

Исправление Zubok, (текущая версия) :

странно, но все равно выводит в буффер *Message*.

Если будешь делать из *scratch* при помощи C-x C-e, то будет выводить, потому что в лог засовывает уже этот eval после выхода из let, потому что этот исполняемый кусок возвращает как результат «hello». А ты попробуй в цикле сделать этот кусок.

(defun test ()
  (let ((message-log-max nil))
    (dotimes (i 10)
      (message "hello"))))

(test) ;; C-x C-e

или так:

(defun test ()
  (dotimes (i 10)
    (message "hello"))))

(let ((message-log-max nil)) ;; C-x C-e
  (test))

Исходная версия Zubok, :

странно, но все равно выводит в буффер *Message*.

Если будешь делать из *scratch* при помощи C-x C-e, то будет выводить, потому что в лог засовывает уже этот eval после выхода из let. А ты попробуй в цикле сделать этот кусок.

(defun test ()
  (let ((message-log-max nil))
    (dotimes (i 10)
      (message "hello"))))

(test) ;; C-x C-e

или так:

(defun test ()
  (dotimes (i 10)
    (message "hello"))))

(let ((message-log-max nil)) ;; C-x C-e
  (test))