# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 975881517 0
# Node ID 33df9c2e70bf7f5ba3f2b8b75db6344c45e3e27c
# Parent  3f40525951d5b54202136ef7b7a6450b8af99e34
Don't quote lambdas.

diff -r 3f40525951d5 -r 33df9c2e70bf man/cc-mode.texi
--- a/man/cc-mode.texi	Sun Dec 03 21:41:06 2000 +0000
+++ b/man/cc-mode.texi	Sun Dec 03 22:11:57 2000 +0000
@@ -611,7 +611,7 @@
 @example
 
 (add-hook 'c-mode-common-hook
-	  '(lambda () (c-toggle-auto-hungry-state 1)))
+	  (lambda () (c-toggle-auto-hungry-state 1)))
 
 @end example
 
diff -r 3f40525951d5 -r 33df9c2e70bf man/custom.texi
--- a/man/custom.texi	Sun Dec 03 21:41:06 2000 +0000
+++ b/man/custom.texi	Sun Dec 03 22:11:57 2000 +0000
@@ -1417,14 +1417,9 @@
 
 @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 @@
 
 @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
diff -r 3f40525951d5 -r 33df9c2e70bf man/faq.texi
--- a/man/faq.texi	Sun Dec 03 21:41:06 2000 +0000
+++ b/man/faq.texi	Sun Dec 03 22:11:57 2000 +0000
@@ -4610,9 +4610,9 @@
   (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 @@
 
 @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
diff -r 3f40525951d5 -r 33df9c2e70bf man/gnus.texi
--- a/man/gnus.texi	Sun Dec 03 21:41:06 2000 +0000
+++ b/man/gnus.texi	Sun Dec 03 22:11:57 2000 +0000
@@ -21015,7 +21015,7 @@
 @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? ")
diff -r 3f40525951d5 -r 33df9c2e70bf man/sending.texi
--- a/man/sending.texi	Sun Dec 03 21:41:06 2000 +0000
+++ b/man/sending.texi	Sun Dec 03 22:11:57 2000 +0000
@@ -350,13 +350,13 @@
 
 @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