[slime-cvs] CVS slime/contrib

CVS User trittweiler trittweiler at common-lisp.net
Wed Jan 6 14:55:46 UTC 2010


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

Modified Files:
	slime-autodoc.el ChangeLog 
Log Message:
	* slime-autodoc.el (slime-check-autodoc-at-point): Bind
	`slime-autodoc-use-multiline-p' to nil for normalized test
	results.


--- /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2010/01/06 14:13:48	1.32
+++ /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2010/01/06 14:55:45	1.33
@@ -238,11 +238,12 @@
 ;;;; Test cases
 
 (defun slime-check-autodoc-at-point (arglist)
-  (slime-test-expect (format "Autodoc in `%s' (at %d) is as expected" 
-                             (buffer-string) (point)) 
-                     arglist
-                     (slime-eval (second (slime-make-autodoc-rpc-form)))
-                     'equal))
+  (let ((slime-autodoc-use-multiline-p nil))
+    (slime-test-expect (format "Autodoc in `%s' (at %d) is as expected" 
+                               (buffer-string) (point)) 
+                       arglist
+                       (slime-eval (second (slime-make-autodoc-rpc-form)))
+                       'equal)))
 
 (def-slime-test autodoc.1
     (buffer-sexpr wished-arglist &optional skip-trailing-test-p)
--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/01/06 14:40:20	1.335
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/01/06 14:55:45	1.336
@@ -1,5 +1,11 @@
 2010-01-06  Tobias C. Rittweiler  <tcr at freebits.de>
 
+	* slime-autodoc.el (slime-check-autodoc-at-point): Bind
+	`slime-autodoc-use-multiline-p' to nil for normalized test
+	results.
+
+2010-01-06  Tobias C. Rittweiler  <tcr at freebits.de>
+
 	* swank-arglists.lisp (extract-cursor-marker): Make sure to
 	recurse only if the form, to be recursed into, is a cons.
 





More information about the slime-cvs mailing list