summaryrefslogtreecommitdiff
path: root/cider-client.el
diff options
context:
space:
mode:
authorBozhidar Batsov <bozhidar@tradeo.com>2013-11-15 18:34:46 +0200
committerBozhidar Batsov <bozhidar@tradeo.com>2013-11-15 18:34:46 +0200
commit56c1f899cfffe994f51c4ccd29f0931b3a16458b (patch)
treea141b16ddd36c5be115453b2a76cc0446c825f98 /cider-client.el
parent40b27578c1597e7e9bdd4ec26676ad452b70bc39 (diff)
Extract nrepl-current-repl-buffer and rename it to cider-current-repl-buffer
Diffstat (limited to 'cider-client.el')
-rw-r--r--cider-client.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/cider-client.el b/cider-client.el
index ed392e05..8c8f288c 100644
--- a/cider-client.el
+++ b/cider-client.el
@@ -90,6 +90,12 @@ loaded."
(dolist (request-id pending-request-ids)
(nrepl-send-interrupt request-id (cider-interrupt-handler (current-buffer))))))
+(defun cider-current-repl-buffer ()
+ "The current REPL buffer."
+ (when (nrepl-current-connection-buffer)
+ (buffer-local-value 'nrepl-repl-buffer
+ (get-buffer (nrepl-current-connection-buffer)))))
+
(provide 'cider-client)
;;; cider-client.el ends here