[slime-cvs] CVS slime

[CVS User heller]

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

Modified Files:
	ChangeLog slime.el 
Log Message:
* slime.el (find-definition.3): Fix syntax.

--- /project/slime/cvsroot/slime/ChangeLog	2012/11/02 08:14:42	1.2362
+++ /project/slime/cvsroot/slime/ChangeLog	2012/11/02 08:35:12	1.2363
@@ -1,5 +1,9 @@
 2012-11-02  Helmut Eller  <heller at common-lisp.net>
 
+	* slime.el (find-definition.3): Fix syntax.
+
+2012-11-02  Helmut Eller  <heller at common-lisp.net>
+
 	* swank.lisp (condition-message): New. Binds *print-cirlce.
 	(safe-condition-message): Move binding of printer vars to
 	condition-message.
--- /project/slime/cvsroot/slime/slime.el	2012/11/02 08:14:16	1.1419
+++ /project/slime/cvsroot/slime/slime.el	2012/11/02 08:35:12	1.1420
@@ -7934,12 +7934,12 @@
 (def-slime-test (find-definition.3)
     (name source regexp)
     "Extra tests for defstruct."
-    '(("swank::foo-struct" 
+    '(("swank::foo-struct"
        "(progn
   (defun foo-fun ())
-  (defstruct foo-struct (:constructor nil) (:predicate nil))
+  (defstruct (foo-struct (:constructor nil) (:predicate nil)))
 )"
-       "(defstruct foo-struct"))
+       "(defstruct (foo-struct"))
   (switch-to-buffer "*scratch*")
     (with-temp-buffer
       (insert source)