Browse Source

revert buffer when keyboard-quit

pull/1/head
10sr 13 years ago
parent
commit
e13ac33370
1 changed files with 5 additions and 1 deletions
  1. +5
    -1
      .emacs.el

+ 5
- 1
.emacs.el View File

@@ -1673,9 +1673,13 @@ when SEC is nil, stop auto save if enabled."
"" ""
(interactive) (interactive)
(run-hooks 'before-keyboard-quit-hook) (run-hooks 'before-keyboard-quit-hook)
(call-interactively 'keyboard-quit)
;; (redisplay t) ;; (redisplay t)
(redraw-display) (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)) (run-hooks 'after-keyboard-quit-hook))
(substitute-key-definition 'keyboard-quit 'my-keyboard-quit global-map) (substitute-key-definition 'keyboard-quit 'my-keyboard-quit global-map)
;; (global-set-key (kbd "C-g") 'my-keyboard-quit) ;; (global-set-key (kbd "C-g") 'my-keyboard-quit)


Loading…
Cancel
Save