From jianshi.huang at gmail.com  Wed Jul 15 10:45:43 2009
From: jianshi.huang at gmail.com (Jianshi Huang)
Date: Wed, 15 Jul 2009 19:45:43 +0900
Subject: [stefil-devel] 'q' (call restart 'abort-tests) doesn't work in sldb
	buffer
Message-ID: <1a4744f80907150345s7fa81cf5hd378b6c1338eae53@mail.gmail.com>

I'm using the latest stefil with SLIME (CVS 2009-6-14). The key stroke
'q' doesn't work in the sldb frame which according to the stefil.lisp,
should call the abort-tests restart.

The reason seems to be that swank::*sldb-quit-restart* doesn't like to
be a symbol.

So here's the simple change that make 'q' work in my slime.

===
diff -rN -u old-stefil/stefil.lisp new-stefil/stefil.lisp
--- old-stefil/stefil.lisp	2009-07-15 19:33:55.000000000 +0900
+++ new-stefil/stefil.lisp	2009-07-15 19:33:55.000000000 +0900
@@ -328,7 +328,7 @@
              (return-from restart-wrapper))
             :report-function (lambda (stream)
                                (format stream "~@<Abort the entire
test session~@:>"))))
-       (bind ((swank::*sldb-quit-restart* 'abort-testing))
+       (bind ((swank::*sldb-quit-restart* (find-restart 'abort-testing)))
          , at body))))

 (defun test-was-run-p (test)
===


Cheers,

-- 
???? (Jianshi Huang)



From attila.lendvai at gmail.com  Wed Jul 15 11:28:27 2009
From: attila.lendvai at gmail.com (Attila Lendvai)
Date: Wed, 15 Jul 2009 13:28:27 +0200
Subject: [stefil-devel] 'q' (call restart 'abort-tests) doesn't work in
	sldb buffer
In-Reply-To: <1a4744f80907150345s7fa81cf5hd378b6c1338eae53@mail.gmail.com>
References: <1a4744f80907150345s7fa81cf5hd378b6c1338eae53@mail.gmail.com>
Message-ID: <b54b34af0907150428k676f8989k56577f1205836d31@mail.gmail.com>

> So here's the simple change that make 'q' work in my slime.

thanks a lot!

pushed.

-- 
 attila