Mercurial > emacs
diff man/faq.texi @ 28344:54fda0e8528a
Weed out redundant uses of `function'
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Mon, 27 Mar 2000 04:29:55 +0000 |
parents | ce57565effde |
children | 95bdbefcdac6 |
line wrap: on
line diff
--- a/man/faq.texi Mon Mar 27 04:20:08 2000 +0000 +++ b/man/faq.texi Mon Mar 27 04:29:55 2000 +0000 @@ -1237,9 +1237,8 @@ (file-error nil)) (add-hook 'XXX-mode-hook - (function - (lambda () - (setq abbrev-mode t)))) + (lambda () + (setq abbrev-mode t))) @end lisp @node Turning on auto-fill by default, Associating modes with files, Turning on abbrevs by default, Common requests @@ -1389,9 +1388,8 @@ @lisp (add-hook 'XXX-mode-hook - (function - (lambda () - (setq case-fold-search nil)))) + (lambda () + (setq case-fold-search nil))) @end lisp @node Wrapping words automatically, Spell-checkers, Controlling case sensitivity, Common requests @@ -2014,8 +2012,8 @@ @lisp (add-hook 'dired-load-hook - (function (lambda () - (load "dired-x")))) + (lambda () + (load "dired-x"))) @end lisp With dired-x loaded, @kbd{M-o} toggles omitting in each dired buffer. @@ -3802,8 +3800,8 @@ @lisp (add-hook 'tex-mode-hook - (function (lambda () - (local-set-key (quote [f1]) (quote help-for-help))))) + (lambda () + (local-set-key (quote [f1]) (quote help-for-help)))) @end lisp @@ -3868,13 +3866,11 @@ variable to this "lambda function." For example, @lisp -(setq term-setup-hook - (function - (lambda () - (cond ((string-match "\\`vt220" (or (getenv "TERM") "")) - ;; Make vt220's "Do" key behave like M-x: - (global-set-key [do] 'execute-extended-command)) - )))) +(add-hook 'term-setup-hook + (lambda () + (when (string-match "\\`vt220" (or (getenv "TERM") "")) + ;; Make vt220's "Do" key behave like M-x: + (global-set-key [do] 'execute-extended-command)))) @end lisp For information on what Emacs does every time it is started, see the