[slime-cvs] CVS slime/contrib
CVS User heller
heller at common-lisp.net
Tue Feb 17 09:03:46 UTC 2009
Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv8139/contrib
Modified Files:
ChangeLog slime-repl.el
Log Message:
* slime-repl.el (slime-repl-connected-hook-function): Bind
slime-current-thread to avoid problems with killed threads.
--- /project/slime/cvsroot/slime/contrib/ChangeLog 2009/02/14 12:59:32 1.174
+++ /project/slime/cvsroot/slime/contrib/ChangeLog 2009/02/17 09:03:46 1.175
@@ -1,3 +1,8 @@
+2009-02-17 Helmut Eller <heller at common-lisp.net>
+
+ * slime-repl.el (slime-repl-connected-hook-function): Bind
+ slime-current-thread to avoid problems with killed threads.
+
2009-02-14 Helmut Eller <heller at common-lisp.net>
* swank.rb: New file.
--- /project/slime/cvsroot/slime/contrib/slime-repl.el 2009/01/27 15:13:52 1.14
+++ /project/slime/cvsroot/slime/contrib/slime-repl.el 2009/02/17 09:03:46 1.15
@@ -1499,7 +1499,8 @@
(defun slime-repl-connected-hook-function ()
(destructuring-bind (package prompt)
- (slime-eval '(swank:create-repl nil))
+ (let ((slime-current-thread t))
+ (slime-eval '(swank:create-repl nil)))
(setf (slime-lisp-package) package)
(setf (slime-lisp-package-prompt-string) prompt))
(slime-hide-inferior-lisp-buffer)
More information about the slime-cvs
mailing list