Pomodoro可在当前window中新建buffer提示吗

Emacs-general
2

好好看了一下lisp的入门资料，原来这个功能不难实现。 我是这样解决的： a. 定义函数

(defun ziyuan/break-Notify ()
  (
   let ((buf (current-buffer))
        (-buf (generate-new-buffer "*temp*")))
  ;; 分屏、选中下边 window
  (select-window (split-window-below))
  (evil-window-set-height 6)
  (switch-to-buffer -buf)
  ;; (load-theme-buffer-local 'spacemacs-light (current-buffer)) ;; 一个显眼的配色
  (erase-buffer);;把temp中的内容清空
  (insert "休息一下")
  ;; 选中原来 buffer 所在的 window
  (select-window (get-buffer-window buf))
  ))

b. 配置pomodoro：

    (add-hook 'org-pomodoro-finished-hook 'ziyuan/break-Notify)

参考链接： http://ergoemacs.org/emacs/emacs_new_empty_buffer.html https://learnxinyminutes.com/docs/elisp/

2 个赞