Added support to name the slime-output-buffer (slime-repl) to the name of the respective org-babel session

Signed-off-by: Joel Boehland <joel.boehland@evocomputing.com>
This commit is contained in:
Joel Boehland 2010-01-07 20:57:02 -08:00 committed by Eric Schulte
parent 682d7a3193
commit baa98c1f14
1 changed files with 4 additions and 1 deletions

View File

@ -184,7 +184,10 @@ or nil if \"none\" is specified"
"Finish setting up the bindings of org-babel session to a slime-clojure repl"
(let ((pending-session (pop org-babel-clojure-pending-sessions)))
(when pending-session
(org-babel-clojure-bind-session-to-repl-buffer pending-session (slime-output-buffer)))))
(save-excursion
(switch-to-buffer (slime-output-buffer))
(rename-buffer (if (stringp pending-session) pending-session (symbol-name pending-session)))
(org-babel-clojure-bind-session-to-repl-buffer pending-session (slime-output-buffer))))))
(add-hook 'slime-connected-hook 'org-babel-clojure-session-connected-hook)