fix: add review quitting
This commit is contained in:
parent
c49a89705f
commit
ac1757c0a0
1 changed files with 7 additions and 0 deletions
|
@ -84,6 +84,7 @@
|
|||
(define-key prefix-map (kbd "C-a") 'ghpr-review-approve)
|
||||
(define-key prefix-map (kbd "C-r") 'ghpr-review-reject-changes)
|
||||
(define-key prefix-map (kbd "C-o") 'ghpr-review-checkout-branch)
|
||||
(define-key prefix-map (kbd "C-k") 'ghpr-review-quit)
|
||||
(define-key map (kbd "C-c") prefix-map)
|
||||
map)
|
||||
"Keymap for `ghpr-review-mode'.")
|
||||
|
@ -410,6 +411,12 @@ Collects review body and inline comments from current buffer."
|
|||
(error "No PR metadata found in buffer"))
|
||||
(ghpr--checkout-pr-branch ghpr--review-pr-metadata))
|
||||
|
||||
(defun ghpr-review-quit ()
|
||||
"Quit and close the review buffer with confirmation."
|
||||
(interactive)
|
||||
(when (yes-or-no-p "Quit review? ")
|
||||
(kill-buffer (current-buffer))))
|
||||
|
||||
(provide 'ghpr-review)
|
||||
|
||||
;;; ghpr-review.el ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue