浏览代码

revert buffer when keyboard-quit

pull/1/head
10sr 12 年前
父节点
当前提交
e13ac33370
共有 1 个文件被更改,包括 5 次插入1 次删除
  1. +5
    -1
      .emacs.el

+ 5
- 1
.emacs.el 查看文件

@@ -1673,9 +1673,13 @@ when SEC is nil, stop auto save if enabled."
""
(interactive)
(run-hooks 'before-keyboard-quit-hook)
(call-interactively 'keyboard-quit)
;; (redisplay t)
(redraw-display)
;; (run-hooks 'window-configuration-change-hook)
(my-revert-buffer-if-needed)
;; (revert-buffer t t)
(keyboard-quit)
(insert "insert me")
(run-hooks 'after-keyboard-quit-hook))
(substitute-key-definition 'keyboard-quit 'my-keyboard-quit global-map)
;; (global-set-key (kbd "C-g") 'my-keyboard-quit)


正在加载...
取消
保存