Initial commit

This commit is contained in:
Tom Willemsen 2012-01-09 23:58:28 +01:00
commit 59c97f2ada

13
git-auto-commit-mode.el Normal file
View file

@ -0,0 +1,13 @@
(defun git-auto-commit ()
"Commit `buffer-file-name` to git"
(let ((filename (buffer-file-name)))
(shell-command (concat "git add " filename
" && git commit -m '" filename "'"))))
(define-minor-mode git-auto-commit-mode
"Automatically commit any changes made when saving with this mode
turned on"
:lighter "ga"
(if git-auto-commit-mode
(add-hook 'after-save-hook 'git-auto-commit t t)
(remove-hook 'after-save-hook 'git-auto-commit t)))