* lisp/emacs-lisp/cl-lib.el (cl-declaim): Paren typo.

lisp/ChangeLog

+2012-12-10  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* emacs-lisp/cl-lib.el (cl-declaim): Paren typo.
+
 2012-12-09  Eli Zaretskii  <eliz@gnu.org>
 	Parallelize byte compilation on MS-Windows.
 	* makefile.w32-in (WINS_BASIC1, WINS_BASIC2, WINS_BASIC3)
-	(WINS_BASIC4): New variables, subdivide subdirectories into 4
-	parts.
+	(WINS_BASIC4): New variables, subdivide subdirectories into 4 parts.
 	(WINS_BASIC): Define as concatenation of the above.
 	(compile): Subdivide into 4 separate and independent jobs that can
 	be run in parallel.
 	(compile0-CMD, compile0-SH): New targets for compiling
 	COMPILE_FIRST files, which are prerequisites for the rest of the
 	byte-compilation.
-	(compile1-CMD, compile2-CMD, compile3-CMD, compile4-CMD): New
-	targets for parallel compilation with cmd.exe.
+	(compile1-CMD, compile2-CMD, compile3-CMD, compile4-CMD):
+	New targets for parallel compilation with cmd.exe.
 	(compile1-SH, compile2-SH, compile3-SH, compile4-SH): Ditto for
 	compiling under a Unixy shell.

lisp/emacs-lisp/cl-lib.el

@@ -260,7 +260,7 @@ one value.
   "Like `cl-proclaim', but takes any number of unevaluated, unquoted arguments.
 Puts `(cl-eval-when (compile load eval) ...)' around the declarations
 so that they are registered at compile-time as well as run-time."
-  (let ((body (mapcar (lambda (x) `(cl-proclaim ',x) specs))))
+  (let ((body (mapcar (lambda (x) `(cl-proclaim ',x)) specs)))
     (if (cl--compiling-file) `(cl-eval-when (compile load eval) ,@body)
       `(progn ,@body))))           ; Avoid loading cl-macs.el for cl-eval-when.