From c0abcc096abd7f25085661b3999bed657f763092 Mon Sep 17 00:00:00 2001
From: Phil Jackson <phil@shellarchive.co.uk>
Date: Mon, 31 May 2010 16:51:06 +0100
Subject: [PATCH] Ask the user when aborting a rebase.

---
 rebase-mode.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/rebase-mode.el b/rebase-mode.el
index f80bea90..9d02b4ce 100644
--- a/rebase-mode.el
+++ b/rebase-mode.el
@@ -89,10 +89,11 @@ current line down."
 (defun rebase-mode-abort ()
   "Abort this rebase."
   (interactive)
-  (let ((buffer-read-only nil))
-    (delete-region (point-min) (point-max))
-    (save-buffer)
-    (server-edit)))
+  (when (y-or-n-p "Abort this rebase? ")
+    (let ((buffer-read-only nil))
+      (delete-region (point-min) (point-max))
+      (save-buffer)
+      (server-edit))))
 
 (defun rebase-mode-kill-line ()
   "Kill the current action line."