[slime-cvs] CVS slime

CVS User sboukarev sboukarev at common-lisp.net
Thu May 3 07:44:54 UTC 2012


Update of /project/slime/cvsroot/slime
In directory tiger.common-lisp.net:/tmp/cvs-serv9549

Modified Files:
	ChangeLog swank.lisp 
Log Message:
* swank.lisp (find-definitions-find-symbol): Put back accidentally
removed with-buffer-syntax.


--- /project/slime/cvsroot/slime/ChangeLog	2012/05/02 17:33:16	1.2323
+++ /project/slime/cvsroot/slime/ChangeLog	2012/05/03 07:44:53	1.2324
@@ -1,3 +1,8 @@
+2012-05-03  Stas Boukarev  <stassats at gmail.com>
+
+	* swank.lisp (find-definitions-find-symbol): Put back accidentally
+	removed with-buffer-syntax.
+
 2012-05-02  Stas Boukarev  <stassats at gmail.com>
 
 	* swank.lisp (*find-definitions-right-trim*)
--- /project/slime/cvsroot/slime/swank.lisp	2012/05/02 17:33:16	1.788
+++ /project/slime/cvsroot/slime/swank.lisp	2012/05/03 07:44:54	1.789
@@ -2927,7 +2927,8 @@
 (defun find-definitions-find-symbol (name)
   (flet ((do-find (name)
            (multiple-value-bind (symbol found)
-               (parse-symbol name)
+               (with-buffer-syntax ()
+                 (parse-symbol name))
              (when found
                (return-from find-definitions-find-symbol
                  (values symbol found))))))





More information about the slime-cvs mailing list