auto-save files on window or buffer switch

This commit is contained in:
Bozhidar Batsov 2012-03-06 19:23:04 +02:00
parent 27813974d9
commit 935db6d62b

View file

@ -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