commit - 67332bad72a385b3f102139acb1633642cbd9e64
commit + c819459405eb9febdb67b19d08bfa50c5ec83017
blob - 1caa93db1aa54b670e24430973229b1baf8bb000
blob + 5f18f700c482497f71fc054733a0bd2892521bac
--- vc-got-stage.el
+++ vc-got-stage.el
(let ((msg (match-string 1)))
(kill-line) ; kill the question
(vc-got-stage--kill-separators)
- (process-send-string buf (if (y-or-n-p msg) "y\n" "n\n"))
+ (process-send-string buf
+ (condition-case nil
+ (if (y-or-n-p msg) "y\n" "n\n")
+ (quit "q\n")))
(erase-buffer)))))))))
(defun vc-got-stage--sentinel (_proc event)