fix: add review quitting

This commit is contained in:
Lucas Sta Maria 2025-08-26 21:34:42 +08:00
parent c49a89705f
commit ac1757c0a0
Signed by: lucas
GPG key ID: F07FB16A826E3B47

View file

@ -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