master cabb049: Add confirmation to sqlite-mode-delete

[Lars Ingebrigtsen]

branch: master
commit cabb049a5000c62d31628af031b7fb8ae76c9e57
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Add confirmation to sqlite-mode-delete
    
    * lisp/sqlite-mode.el (sqlite-mode-delete): Add confirmation.
---
 lisp/sqlite-mode.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/sqlite-mode.el b/lisp/sqlite-mode.el
index 6714f41..61398c1 100644
--- a/lisp/sqlite-mode.el
+++ b/lisp/sqlite-mode.el
@@ -187,6 +187,8 @@
     (when (or (not (consp table))
               (not (eq (car table) 'row)))
       (user-error "No row under point"))
+    (unless (yes-or-no-p "Really delete the row under point? ")
+      (error "Not deleting"))
     (sqlite-execute
      sqlite--db
      (format "delete from %s where %s"