diff options
author | Eli Zaretskii <eliz@gnu.org> | 2020-06-20 10:29:37 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2020-06-20 10:29:37 +0300 |
commit | 4c8172467533d70e6d2d0a58f527a84a7e59355a (patch) | |
tree | 159e8acb0ab4a378dac2392754f17ef0c66ab271 /doc | |
parent | 229995ba2cd9f6d0a749a38c106cbfbfd04119a8 (diff) | |
download | emacs-4c8172467533d70e6d2d0a58f527a84a7e59355a.tar.gz |
Don't use 'cl' functions in ELisp manual's examples
* doc/lispref/control.texi (pcase Macro): Use 'cl-evenp' instead
of 'evenp'. (Bug#41947)
Diffstat (limited to 'doc')
-rw-r--r-- | doc/lispref/control.texi | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/doc/lispref/control.texi b/doc/lispref/control.texi index 01ae94ea7dd..d2419f415bf 100644 --- a/doc/lispref/control.texi +++ b/doc/lispref/control.texi @@ -959,8 +959,9 @@ For example, the following is invalid: @example @group +(require 'cl-lib) (pcase (read-number "Enter an integer: ") - ((or (and (pred evenp) + ((or (and (pred cl-evenp) e-num) ; @r{bind @code{e-num} to @var{expval}} o-num) ; @r{bind @code{o-num} to @var{expval}} (list e-num o-num))) @@ -984,9 +985,10 @@ Reworking the above example: @example @group +(require 'cl-lib) (pcase (read-number "Enter an integer: ") ((and num ; @r{line 1} - (or (and (pred evenp) ; @r{line 2} + (or (and (pred cl-evenp) ; @r{line 2} (let spin 'even)) ; @r{line 3} (let spin 'odd))) ; @r{line 4} (list spin num))) ; @r{line 5} |