Emacs自动保存在切换缓冲区

Question

给我打电话跛脚，但我厌倦了我的潜意识C-x C-s紧张抽搐。我经常切换缓冲区，我想我会在切换到另一个时立即保存某个缓冲区。我还没有时间学习Emacs-Lisp基础知识。

任何提示如何做到这一点，或更好的解决方案？

（与此相关的，我发现了一个autosave workaround可以，只要你有空闲的给定时间内保存当前的缓冲区。）

Answer 1

要扩大Seth的answer，我应该这样做：

(defadvice switch-to-buffer (before save-buffer-now activate) 
    (when buffer-file-name (save-buffer))) 
(defadvice other-window (before other-window-now activate) 
    (when buffer-file-name (save-buffer))) 
(defadvice other-frame (before other-frame-now activate) 
    (when buffer-file-name (save-buffer))) 

为buffer-file-name支票避免保存缓冲区瓦特/输出文件。你需要弄清楚你用来切换你所关心的缓冲区的所有入口点（我也建议other-window）。

Answer 2

我有点新的Emacs Lisp自己，但此在我的测试工作：

(defadvice switch-to-buffer (before save-buffer-now) 
    (save-buffer)) 

(ad-activate 'switch-to-buffer) 

这是一种恼人的，但因为它的每一个缓冲后调用（如划伤）。所以，考虑这个答案是一个提示。

当你想关闭它，你需要拨打：

(ad-disable-advice 'switch-to-buffer 'before 'save-buffer-now) 
(ad-activate 'switch-to-buffer) 

Answer 3

一对夫妇的想法。首先，如果你发现自己调用了一个频率足够高的保存命令，你可能会考虑使用一个较短的键绑定命令。例如，我也发现自己有相同的“抽搐”，所以现在我使用f2而不是C-x C-s来保存编辑。

我绑定到f2的函数会无条件地保存每个未保存的缓冲区。您可能会觉得它很有用：

(defun force-save-all() 
    "Unconditionally saves all unsaved buffers." 
    (interactive) 
    (save-some-buffers t)) 

(global-set-key [f2] 'force-save-all) 

现在，就主要问题。你可以尝试这样的事情（注意force-save-all叫）：

(defun my-switch-to-buffer (buffer) 
    (interactive (list (read-buffer "Switch to buffer: " (cadr buffer-name-history) nil))) 
    (force-save-all) 
    (switch-to-buffer buffer)) 

(global-set-key "\C-xb" 'my-switch-to-buffer) 

当然，你也可以在开关缓冲功能绑定到另一个关键，就像一个功能键，所以它是一个一个按下操作。

我认为@seth关于使用建议有一个好主意，但我注意到ELisp手册建议advice not be used for key bindings。我不太清楚为什么会出现这种情况，但这是手册中提供的FYI的说明。