diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-07-15 18:32:34 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-07-15 18:32:34 +0200 |
| commit | 8f5738eb8fc7556b69016976dfa810f7e6275bf8 (patch) | |
| tree | 7e6772bcc9c05f26715961cdab7fcdd980d1857f /lisp | |
| parent | 22a5482ab699973e286d7dceb20fe469c94533dd (diff) | |
| download | emacs-8f5738eb8fc7556b69016976dfa810f7e6275bf8.tar.gz emacs-8f5738eb8fc7556b69016976dfa810f7e6275bf8.tar.bz2 emacs-8f5738eb8fc7556b69016976dfa810f7e6275bf8.zip | |
Add more car/cdr examples to shortdoc
* lisp/emacs-lisp/shortdoc.el (list): Add more car/cdr examples.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/shortdoc.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el index dbf16967bcf..3a32f632573 100644 --- a/lisp/emacs-lisp/shortdoc.el +++ b/lisp/emacs-lisp/shortdoc.el @@ -503,9 +503,13 @@ There can be any number of :example/:result elements." (flatten-tree :eval (flatten-tree '(1 (2 3) 4))) (car - :eval (car '(one two three))) + :eval (car '(one two three)) + :eval (car '(one . two)) + :eval (car nil)) (cdr - :eval (cdr '(one two three))) + :eval (cdr '(one two three)) + :eval (cdr '(one . two)) + :eval (cdr nil)) (last :eval (last '(one two three))) (butlast |