Display-buffer-at-bottom для всплывающего сообщения - PullRequest
0 голосов
/ 12 марта 2020

Я написал такую ​​функцию для всплывающего буфера внизу

(defun popup-new-message (msg)
  (interactive
   (let ((buffer (generate-new-buffer "pop-message")))
     (with-current-buffer buffer
       (insert msg))
     (display-buffer buffer '(display-buffer-at-bottom . nil)))
   ))
(popup-new-message "It's time to have a rest.")

При запуске ничего не произошло.

В чем проблема?

Я проверил, что функции generate-new-buffer и display-message работают

#+begin_src emacs-lisp :tangle yes
(let ((buffer (generate-new-buffer "pop-message")))
  (print buffer))
#+end_src

#+RESULTS:
: #<buffer pop-message<2>>

1 Ответ

0 голосов
/ 20 марта 2020

Ваш (интерактивный S-EXP закрыт неправильно.

...