auto-save files on window or buffer switch
This commit is contained in:
parent
27813974d9
commit
935db6d62b
1 changed files with 15 additions and 0 deletions
|
@ -360,5 +360,20 @@ there's a region, all lines that region covers will be duplicated."
|
||||||
(global-set-key [M-left] 'left-word)
|
(global-set-key [M-left] 'left-word)
|
||||||
(message "Arrow keys navigation in buffers in now allowed."))
|
(message "Arrow keys navigation in buffers in now allowed."))
|
||||||
|
|
||||||
|
;; automatically save buffers associated with files on buffer switch
|
||||||
|
;; and on windows switch
|
||||||
|
(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 windmove-up (before other-window-now activate)
|
||||||
|
(when buffer-file-name (save-buffer)))
|
||||||
|
(defadvice windmove-down (before other-window-now activate)
|
||||||
|
(when buffer-file-name (save-buffer)))
|
||||||
|
(defadvice windmove-left (before other-window-now activate)
|
||||||
|
(when buffer-file-name (save-buffer)))
|
||||||
|
(defadvice windmove-right (before other-window-now activate)
|
||||||
|
(when buffer-file-name (save-buffer)))
|
||||||
|
|
||||||
(provide 'prelude-core)
|
(provide 'prelude-core)
|
||||||
;;; prelude-core.el ends here
|
;;; prelude-core.el ends here
|
||||||
|
|
Loading…
Reference in a new issue