blob: aa1621bef3f954e1728c02cdfd4d7780c3ace955 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
(require 'magit)
(defun km/magit-auto-commit ()
(interactive)
(save-window-excursion
(magit-with-refresh
(shell-command "git --no-pager commit --all --message=auto"))))
(define-key magit-status-mode-map (kbd "C-c C-u") 'km/magit-auto-commit)
;; http://whattheemacsd.com/setup-magit.el-01.html
(defadvice magit-status (around magit-fullscreen activate)
(window-configuration-to-register :magit-fullscreen)
ad-do-it
(delete-other-windows))
(defadvice magit-mode-quit-window (around magit-restore-screen activate)
ad-do-it
(jump-to-register :magit-fullscreen))
;; http://whattheemacsd.com/setup-magit.el-05.html
(defun km/magit-just-amend ()
(interactive)
(save-window-excursion
(magit-with-refresh
(shell-command "git --no-pager commit --amend --reuse-message=HEAD"))))
(define-key magit-status-mode-map (kbd "C-c C-a") 'km/magit-just-amend)
|