Преглед на файлове

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)


Зареждане…
Отказ
Запис