From 2149f43c13e2057ee9a59e512dda7a4bdf7f2ca8 Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Fri, 28 Aug 2015 19:56:56 +0300 Subject: Add explicit connection param to nrepl-sync-request:close --- cider-interaction.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'cider-interaction.el') diff --git a/cider-interaction.el b/cider-interaction.el index 2c0e7d65..7555351c 100644 --- a/cider-interaction.el +++ b/cider-interaction.el @@ -2339,7 +2339,7 @@ the string contents of the region into a formatted string." (interactive) (let ((selected-session (completing-read "Close nREPL session: " (nrepl-sessions (cider-current-repl-buffer))))) (when selected-session - (nrepl-sync-request:close selected-session) + (nrepl-sync-request:close (cider-current-repl-buffer) selected-session) (message "Closed nREPL session %s" selected-session)))) ;;; quiting @@ -2349,9 +2349,9 @@ the string contents of the region into a formatted string." (with-current-buffer buffer (setq nrepl--closing-connection t) (when nrepl-session - (nrepl-sync-request:close nrepl-session)) + (nrepl-sync-request:close (cider-current-repl-buffer) nrepl-session)) (when nrepl-tooling-session - (nrepl-sync-request:close nrepl-tooling-session)) + (nrepl-sync-request:close (cider-current-repl-buffer) nrepl-tooling-session)) (when (get-buffer-process buffer) (delete-process (get-buffer-process buffer)))) (kill-buffer buffer))) -- cgit v1.2.3