Add gitsum-push, bound to P

1 files changed, 7 insertions, 0 deletions

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)