It's not hard to extend emacs

当有多个标签页打开时,关闭firefox会被询问“是否真的关闭多个标签页”;使用gnome-terminal也是一样,于是我就想,能不能让emacs在有多个frame存在的时候也询问类似的问题。写出来之后发现,还真简单:

(defun multiple-frames-kill-emacs-query-function ()
  "Ask before exiting Emacs if it has more than one frames."
  (let ((frames (length (frame-list))))
    (if (= frames 1)
	t
      (let ((msg (format "%d frames exist; exit anyway? " frames)))
	(yes-or-no-p msg)))))

(add-to-list 'kill-emacs-query-functions
	     'multiple-frames-kill-emacs-query-function)

实现了这个功能后就想,emacs有没有会话保存、恢复功能呢?找了找,发现已经有了,就是desktop-save,尽管不是emacs里面的所有东西都能保存(比如gnus就不行),但是打开的文件都没问题。

最近尝试着写了一些emacs lisp代码,自我感觉是件挺好的事情,只有不断地实践,才能学好一门语言。

2 thoughts on “It's not hard to extend emacs

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据