diff options
Diffstat (limited to 'tools/emacs-pkgs/tvl/tvl.el')
-rw-r--r-- | tools/emacs-pkgs/tvl/tvl.el | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tools/emacs-pkgs/tvl/tvl.el b/tools/emacs-pkgs/tvl/tvl.el index 500ffa165317..46dbe0ca6834 100644 --- a/tools/emacs-pkgs/tvl/tvl.el +++ b/tools/emacs-pkgs/tvl/tvl.el @@ -104,6 +104,19 @@ passes. This is potentially dangerous, use with care." #'magit-push ["r"] (list "P" "push & rubberstamp to Gerrit" #'magit-gerrit-rubberstamp)) +(transient-define-suffix magit-gerrit-push-private () + "Push a private change to Gerrit." + (interactive) + (magit-push-refspecs tvl-gerrit-remote + (tvl--gerrit-ref tvl-target-branch + '("private" + "publish-comments")) + nil)) + +(transient-append-suffix + #'magit-push ["r"] + (list "Q" "push private change to Gerrit" #'magit-gerrit-push-private)) + (defvar magit-cl-history nil) (defun magit-read-cl (prompt remote) (let* ((refs (prog2 (message "Determining available refs...") |