[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

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

Modified Files:
	ChangeLog slime-parse.el 
Log Message:
* contrib/slime-parse.el (slime-incomplete-form-at-point): Concatenate " )"
not just ")", because the form's last char may be \, and the parenthesis
will be escaped.
That fixes a bug reported by Ariel Badichi.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2009/10/31 22:41:04	1.267
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2009/11/02 12:02:27	1.268
@@ -1,3 +1,10 @@
+2009-11-02  Stas Boukarev  <stassats at gmail.com>
+
+	* slime-parse.el (slime-incomplete-form-at-point): Concatenate " )"
+	not just ")", because the form's last char may be \, and the parenthesis
+	will be escaped.
+	That fixes a bug reported by Ariel Badichi.
+
 2009-10-31  Tobias C. Rittweiler  <tcr at freebits.de>
 
 	* slime-fontifying-fu.el (slime-search-suppressed-forms-internal):
--- /project/slime/cvsroot/slime/contrib/slime-parse.el	2009/10/31 22:13:55	1.25
+++ /project/slime/cvsroot/slime/contrib/slime-parse.el	2009/11/02 12:02:27	1.26
@@ -9,7 +9,7 @@
 
 (defun slime-incomplete-form-at-point ()
   (slime-make-form-spec-from-string 
-   (concat (slime-incomplete-sexp-at-point) ")")))
+   (concat (slime-incomplete-sexp-at-point) " )")))
 
 (defun slime-parse-sexp-at-point (&optional n skip-blanks-p)
   "Returns the sexps at point as a list of strings, otherwise nil.