diff options
Diffstat (limited to 'doc/lispintro')
| -rw-r--r-- | doc/lispintro/emacs-lisp-intro.texi | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/doc/lispintro/emacs-lisp-intro.texi b/doc/lispintro/emacs-lisp-intro.texi index 55c3ef4e09e..70ddb81c776 100644 --- a/doc/lispintro/emacs-lisp-intro.texi +++ b/doc/lispintro/emacs-lisp-intro.texi @@ -17909,10 +17909,10 @@ file that set values: @group ;; Set calendar highlighting colors (setq calendar-load-hook - '(lambda () - (set-face-foreground 'diary-face "skyblue") - (set-face-background 'holiday-face "slate blue") - (set-face-foreground 'holiday-face "white"))) + (lambda () + (set-face-foreground 'diary-face "skyblue") + (set-face-background 'holiday-face "slate blue") + (set-face-foreground 'holiday-face "white"))) @end group @end smallexample @@ -20947,7 +20947,7 @@ not yet seen, @code{mapcar} and @code{lambda}. @group (defun one-fiftieth (full-range) "Return list, each number one-fiftieth of previous." - (mapcar '(lambda (arg) (/ arg 50)) full-range)) + (mapcar (lambda (arg) (/ arg 50)) full-range)) @end group @end smallexample @@ -21168,7 +21168,7 @@ and the second argument is @code{full-range}, which will be bound to The whole expression looks like this: @smallexample -(mapcar '(lambda (arg) (/ arg 50)) full-range)) +(mapcar (lambda (arg) (/ arg 50)) full-range)) @end smallexample @xref{Mapping Functions, , Mapping Functions, elisp, The GNU Emacs @@ -21840,7 +21840,7 @@ each column." @group (defun one-fiftieth (full-range) "Return list, each number of which is 1/50th previous." - (mapcar '(lambda (arg) (/ arg 50)) full-range)) + (mapcar (lambda (arg) (/ arg 50)) full-range)) @end group @end smallexample |