diff options
| author | Vitalie Spinu <spinuvit@gmail.com> | 2018-06-18 00:08:39 +0200 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2018-06-18 07:37:17 +0300 |
| commit | ecc0a55d77065c94450e0d78124bfd45e20972f1 (patch) | |
| tree | d681297fde56f3f608a14886bab63e92c09784a2 | |
| parent | 99ca2281b577bf4b6698c849e923cc0f10b9be98 (diff) | |
On session-restart don't unregister links
| -rw-r--r-- | cider-connection.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cider-connection.el b/cider-connection.el index a15aee63..8c6e2be9 100644 --- a/cider-connection.el +++ b/cider-connection.el @@ -121,7 +121,6 @@ buffer." (process-live-p (get-buffer-process nrepl-server-buffer)))) (nrepl-sync-request:close repl) (delete-process proc))) - (sesman-remove-object 'CIDER nil repl t t) (when-let* ((messages-buffer (and nrepl-log-messages (nrepl-messages-buffer repl)))) (kill-buffer messages-buffer)) @@ -130,7 +129,9 @@ buffer." (goto-char (point-max)) (cider-repl-emit-interactive-stderr (format "*** Closed on %s ***\n" (current-time-string)))) - (kill-buffer repl)))) + (kill-buffer repl))) + (when repl + (sesman-remove-object 'CIDER nil repl (not no-kill) t))) (defun cider-emit-manual-warning (section-id format &rest args) "Emit a warning to the REPL and link to the online manual. @@ -219,7 +220,6 @@ This function is appended to `nrepl-disconnected-hook' in the client process buffer." ;; `nrepl-connected-hook' is run in the connection buffer (cider-possibly-disable-on-existing-clojure-buffers) - (sesman-remove-object 'CIDER nil (current-buffer) t t) (run-hooks 'cider-disconnected-hook)) |