[slime-cvs] CVS slime

[CVS User sboukarev]

Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv7782

Modified Files:
	ChangeLog swank.lisp 
Log Message:
swank.lisp(handle-requests): Comment out
(assert (boundp '*sldb-quit-restart*)) because it's not bound
on NIL communication style. It's not a real fix, but at least it
lets null communication-style work.


--- /project/slime/cvsroot/slime/ChangeLog	2009/12/16 21:59:49	1.1940
+++ /project/slime/cvsroot/slime/ChangeLog	2009/12/17 06:25:00	1.1941
@@ -1,3 +1,10 @@
+2009-12-17  Stas Boukarev  <stassats at gmail.com>
+
+	* swank.lisp (handle-requests): Comment out
+	(assert (boundp '*sldb-quit-restart*)) because it's not bound
+	on NIL communication style. It's not a real fix, but at least it
+	lets null communication-style work.
+
 2009-12-16  Tobias C. Rittweiler <tcr at freebits.de>
 
 	* swank-sbcl.org (categorize-definition-source): New.
--- /project/slime/cvsroot/slime/swank.lisp	2009/12/16 11:36:45	1.677
+++ /project/slime/cvsroot/slime/swank.lisp	2009/12/17 06:25:00	1.678
@@ -1010,7 +1010,8 @@
   "Read and process :emacs-rex requests.
 The processing is done in the extent of the toplevel restart."
   (cond ((eq *emacs-connection* connection)
-         (assert (boundp '*sldb-quit-restart*))
+         ;; *sldb-quit-restart* isn't bound here on *communication-style* NIL
+         ;; (assert (boundp '*sldb-quit-restart*))
          (process-requests timeout))
         (t
          (tagbody