Unglobify user-save-mode
This commit is contained in:
parent
e76a106571
commit
3b9b91686f
2
init.el
2
init.el
|
@ -114,7 +114,7 @@
|
||||||
|
|
||||||
(setup (:require user-save)
|
(setup (:require user-save)
|
||||||
(add-hook 'user-save-hook #'+clean-empty-lines)
|
(add-hook 'user-save-hook #'+clean-empty-lines)
|
||||||
(user-save-mode +1))
|
(user-save-global-mode +1))
|
||||||
|
|
||||||
(setup +key
|
(setup +key
|
||||||
(+ensure-after-init #'+key-global-mode))
|
(+ensure-after-init #'+key-global-mode))
|
||||||
|
|
|
@ -73,9 +73,16 @@ whether the buffer needs to be saved."
|
||||||
(define-minor-mode user-save-mode
|
(define-minor-mode user-save-mode
|
||||||
"Mode to enable an an extra user-save hook."
|
"Mode to enable an an extra user-save hook."
|
||||||
:lighter " US"
|
:lighter " US"
|
||||||
:global t
|
:keymap user-save-mode-map)
|
||||||
:keymap 'user-save-mode-map
|
|
||||||
(if user-save-mode
|
;;;###autoload
|
||||||
|
(defun turn-off-user-save-mode ()
|
||||||
|
"Turn off `user-save-mode' in the current buffer."
|
||||||
|
(user-save-mode -1))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(define-globalized-minor-mode user-save-global-mode user-save-mode user-save-mode
|
||||||
|
(if user-save-global-mode
|
||||||
(when user-save-hook-into-kill-emacs
|
(when user-save-hook-into-kill-emacs
|
||||||
(add-hook 'kill-emacs-hook #'user-save-some-buffers))
|
(add-hook 'kill-emacs-hook #'user-save-some-buffers))
|
||||||
(remove-hook 'kill-emacs-hook #'user-save-some-buffers)))
|
(remove-hook 'kill-emacs-hook #'user-save-some-buffers)))
|
||||||
|
|
Loading…
Reference in New Issue