diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-12-01 10:59:54 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-12-01 10:59:54 +0000 |
commit | c2288d2cb8cac4e35223a9883fcb5d9c6872b071 (patch) | |
tree | fcf123811c993e9625b48900dc5c1b051dd9b0dd /nrepl-client.el | |
parent | ae3dc2b4e219da506bd8242e9538dd1891d105cf (diff) |
[Fix #1442] Hang during cider-quit due to wrong session
Diffstat (limited to 'nrepl-client.el')
-rw-r--r-- | nrepl-client.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/nrepl-client.el b/nrepl-client.el index 8a4d9465..94cd2532 100644 --- a/nrepl-client.el +++ b/nrepl-client.el @@ -898,8 +898,8 @@ REQUEST is a pair list of the form (\"op\" \"operation\" \"par1-name\" `nrepl-request:stdin', etc. Return the ID of the sent message." (with-current-buffer connection - (unless (or (plist-get request "session") - (not nrepl-session)) + (when (and (not (lax-plist-get request "session")) + nrepl-session) (setq request (append request (list "session" nrepl-session)))) (let* ((id (nrepl-next-request-id connection)) (request (cons 'dict (lax-plist-put request "id" id))) |