[slime-cvs] CVS slime

[heller]

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

Modified Files:
	slime.el 
Log Message:
*** empty log message ***

--- /project/slime/cvsroot/slime/slime.el	2006/10/19 12:11:15	1.667
+++ /project/slime/cvsroot/slime/slime.el	2006/10/19 12:11:42	1.668
@@ -2403,8 +2403,9 @@
                 (re-search-forward regexp nil t)))
       (goto-char (match-end 0))
       (let ((start (point)))
+        (ignore-errors
           (up-list 1)
-          (buffer-substring-no-properties start (1- (point)))))))
+          (buffer-substring-no-properties start (1- (point))))))))
 
 ;;; Synchronous requests are implemented in terms of asynchronous
 ;;; ones. We make an asynchronous request with a continuation function