[nongnu] elpa/sly 573fef2 2/3: Fix #409: make it less dangerous to inadvertently restart a connection

[ELPA Syncer]

branch: elpa/sly
commit 573fef2fe4bff961a764b5e27a3e8bf92e5fdf7e
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Fix #409: make it less dangerous to inadvertently restart a connection
    
    * sly.el (sly-restart-connection-at-point): confirm with user.
---
 sly.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/sly.el b/sly.el
index 748b183..04f4716 100644
--- a/sly.el
+++ b/sly.el
@@ -6479,8 +6479,9 @@ was called originally."
 
 (defun sly-restart-connection-at-point (connection)
   (interactive (list (sly--connection-at-point)))
-  (let ((sly-dispatching-connection connection))
-    (sly-restart-inferior-lisp)))
+  (when (sly-y-or-n-p "Really restart '%s'" (sly-connection-name connection))
+    (let ((sly-dispatching-connection connection))
+      (sly-restart-inferior-lisp))))
 
 (defun sly-connection-list-make-default ()
   "Make the connection at point the default connection."