From a860615256c00f0574961d6771a3324359776c6d Mon Sep 17 00:00:00 2001 From: Christian Neukirchen Date: Wed, 6 Feb 2008 16:38:25 +0100 Subject: Add gitsum-push, bound to P --- gitsum.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/gitsum.el b/gitsum.el index d13d623..f62687c 100644 --- a/gitsum.el +++ b/gitsum.el @@ -14,6 +14,7 @@ (easy-mmode-defmap gitsum-diff-mode-shared-map '(("c" . gitsum-commit) ("g" . gitsum-refresh) + ("P" . gitsum-push) ("R" . gitsum-revert) ("s" . gitsum-switch-to-git-status) ("q" . gitsum-kill-buffer) @@ -80,6 +81,12 @@ A numeric argument serves as a repeat count." (goto-char (point-min))) (log-edit 'gitsum-do-commit nil nil buffer))) +(defun gitsum-push () + "Push the current repository." + (interactive) + (let ((args (read-string "Shell command: " "git push "))) + (shell-command args))) + (defun gitsum-revert () "Revert the active patches in the working directory." (interactive) -- cgit 1.4.1