[slime-cvs] CVS slime

[heller]

Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv17873

Modified Files:
	slime.el 
Log Message:
(sldb-activate): Get debug-info from the correct thread. Fixes bug
reported by Dan Weinreb <dlw at itasoftware.com>.


--- /project/slime/cvsroot/slime/slime.el	2006/10/11 11:59:56	1.659
+++ /project/slime/cvsroot/slime/slime.el	2006/10/16 13:14:19	1.660
@@ -7908,10 +7908,11 @@
 (defun sldb-activate (thread level)
   (unless (let ((b (sldb-find-buffer thread)))
             (and b (with-current-buffer b (equal sldb-level level))))
-    (with-lexical-bindings (thread level)
-      (slime-eval-async `(swank:debugger-info-for-emacs 0 10)
-                        (lambda (result)
-                          (apply #'sldb-setup thread level result))))))
+    (slime-rex (thread level)
+        ('(swank:debugger-info-for-emacs 0 10)
+         nil thread)
+      ((:ok result)
+       (apply #'sldb-setup thread level result)))))
 
 (defun sldb-exit (thread level &optional stepping)
   (when-let (sldb (sldb-find-buffer thread))