[Cl-monad-macros-cvs] r2 - trunk

[David Sorokin]

Author: dsorokin
Date: Thu Jan 21 04:50:28 2010
New Revision: 2

Log:
Removed unnecessary space.

Modified:
   trunk/cl-monad-macros.lisp

Modified: trunk/cl-monad-macros.lisp
==============================================================================
--- trunk/cl-monad-macros.lisp	(original)
+++ trunk/cl-monad-macros.lisp	Thu Jan 21 04:50:28 2010
@@ -107,7 +107,7 @@
   (reduce #'(lambda (m1 m2)
 	      (let ((x (gensym)))
 		`(funcall!
-		  #'(lambda (, x)
+		  #'(lambda (,x)
 		      (declare (ignore ,x))
 		      ,m2)
 		  ,m1)))