From ac348012f4f956fa7e64535a3875a32cff91503c Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 17 May 2012 11:15:51 -0400 Subject: * lisp/emacs-lisp/cl-macs.el (cl-transform-lambda): Don't add spurious parens around the arg list. Fixes: debbugs:11499 --- lisp/emacs-lisp/cl-macs.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 8050da400fe..66fafb9ba41 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -318,8 +318,9 @@ It is a list of elements of the form either: (require 'help-fns) (cons (help-add-fundoc-usage (if (stringp (car hdr)) (pop hdr)) - (format "(fn %S)" - (cl--make-usage-args orig-args))) + (format "%S" + (cons 'fn + (cl--make-usage-args orig-args)))) hdr))) (list (nconc (list 'let* bind-lets) (nreverse bind-forms) body))))))) -- cgit v1.2.3