Don't quote lambdas.

man/cc-mode.texi

@@ -611,7 +611,7 @@ to your @file{.emacs} file:
 @example
 
 (add-hook 'c-mode-common-hook
-	  '(lambda () (c-toggle-auto-hungry-state 1)))
+	  (lambda () (c-toggle-auto-hungry-state 1)))
 
 @end example
 

man/custom.texi

@@ -1417,14 +1417,9 @@ to add local bindings (not very useful, we admit) for @kbd{C-c n} and
 
 @example
 (add-hook 'texinfo-mode-hook
-          '(lambda ()
-             (define-key texinfo-mode-map
-                         "\C-cp"
-                         'backward-paragraph)
-             (define-key texinfo-mode-map
-                         "\C-cn"
-                         'forward-paragraph)
-             ))
+          (lambda ()
+            (define-key texinfo-mode-map "\C-cp" 'backward-paragraph)
+            (define-key texinfo-mode-map "\C-cn" 'forward-paragraph)))
 @end example
 
   @xref{Hooks}.
@@ -2167,7 +2162,7 @@ Turn on Auto Fill mode automatically in Text mode and related modes.
 
 @example
 (add-hook 'text-mode-hook
-  '(lambda () (auto-fill-mode 1)))
+  (lambda () (auto-fill-mode 1)))
 @end example
 
 This shows how to add a hook function to a normal hook variable

man/faq.texi

@@ -4610,9 +4610,9 @@ best fix I've been able to come up with:
   (rmail-reply t))
 
 (add-hook 'rmail-mode-hook
-  '(lambda ()
-     (define-key rmail-mode-map "r" 'rmail-reply-t)
-     (define-key rmail-mode-map "R" 'rmail-reply)))
+  (lambda ()
+    (define-key rmail-mode-map "r" 'rmail-reply-t)
+    (define-key rmail-mode-map "R" 'rmail-reply)))
 @end lisp
 
 @node MIME with Emacs mail packages, Automatically starting a mail or news reader, Replying to the sender of a message, Mail and news
@@ -4737,7 +4737,7 @@ automatically via
 
 @lisp
 (add-hook 'gnus-article-prepare-hook
-  '(lambda () (ununderline-region (point-min) (point-max))))
+  (lambda () (ununderline-region (point-min) (point-max))))
 @end lisp
 
 @node Saving a multi-part Gnus posting, Starting Gnus faster, Viewing articles with embedded underlining, Mail and news

man/gnus.texi

@@ -21015,7 +21015,7 @@ Mac, MS (etc) characters into ISO 8859-1.
 @item
 @example
  (add-hook 'gnus-exit-query-functions
-'(lambda ()
+ (lambda ()
    (if (and (file-exists-p nnmail-spool-file)
             (> (nnheader-file-size nnmail-spool-file) 0))
        (yes-or-no-p "New mail has arrived.  Quit Gnus anyways? ")

man/sending.texi

@@ -350,13 +350,13 @@ expansion as well.  Here's how to do that:
 
 @smallexample
 (add-hook 'mail-setup-hook
-          '(lambda ()
-             (substitute-key-definition
-               'next-line 'mail-abbrev-next-line
-               mail-mode-map global-map)
-             (substitute-key-definition
-               'end-of-buffer 'mail-abbrev-end-of-buffer
-               mail-mode-map global-map)))
+          (lambda ()
+            (substitute-key-definition
+              'next-line 'mail-abbrev-next-line
+              mail-mode-map global-map)
+            (substitute-key-definition
+              'end-of-buffer 'mail-abbrev-end-of-buffer
+              mail-mode-map global-map)))
 @end smallexample
 
 @node Mail Mode