From c96f8327f6ffd89f3def1387d0ab2d2d66f8f2d3 Mon Sep 17 00:00:00 2001 From: Griffin Smith Date: Wed, 24 Jun 2020 16:14:00 -0400 Subject: feat(tvl.el): Add push-wip command P W, to push as a work-in-progress CL Change-Id: Ibc6973512e8dcd3ce77b2f1064906a98e9a3a182 Reviewed-on: https://cl.tvl.fyi/c/depot/+/575 Reviewed-by: tazjin --- tools/emacs-pkgs/tvl/tvl.el | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/tools/emacs-pkgs/tvl/tvl.el b/tools/emacs-pkgs/tvl/tvl.el index 8468efed04..987ddcfe93 100644 --- a/tools/emacs-pkgs/tvl/tvl.el +++ b/tools/emacs-pkgs/tvl/tvl.el @@ -45,6 +45,17 @@ #'magit-push ["r"] (list "R" "push to Gerrit for review" #'magit-gerrit-push-for-review)) +(define-suffix-command magit-gerrit-push-wip () + "Push to Gerrit as a work-in-progress." + (interactive) + (magit-push-refspecs tvl-gerrit-remote + (concat (tvl--gerrit-ref "canon") "%wip") + nil)) + +(transient-append-suffix + #'magit-push ["r"] + (list "W" "push to Gerrit as a work-in-progress" #'magit-gerrit-push-wip)) + (define-suffix-command magit-gerrit-submit () "Push to Gerrit for review." (interactive) -- cgit 1.4.1