diff options
| author | Glenn Morris | 2007-10-12 06:39:21 +0000 |
|---|---|---|
| committer | Glenn Morris | 2007-10-12 06:39:21 +0000 |
| commit | 551e625ffe12c7189ac631326dc8d4a7f06d8b0f (patch) | |
| tree | 903006fab83bd432fb72678dbdd41b16af746e3e | |
| parent | fe2ca5ece2678c45c9643f7b062746665980f40d (diff) | |
| download | emacs-551e625ffe12c7189ac631326dc8d4a7f06d8b0f.tar.gz emacs-551e625ffe12c7189ac631326dc8d4a7f06d8b0f.zip | |
Remove some trailing whitespace.
(reftex-do-citation)
(reftex-insert-bib-matches): Use mapc rather than mapcar.
| -rw-r--r-- | lisp/textmodes/reftex-cite.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/textmodes/reftex-cite.el b/lisp/textmodes/reftex-cite.el index c8a64b8aecc..46becd26dd4 100644 --- a/lisp/textmodes/reftex-cite.el +++ b/lisp/textmodes/reftex-cite.el | |||
| @@ -702,26 +702,26 @@ While entering the regexp, completion on knows citation keys is possible. | |||
| 702 | (delete-char 1)) | 702 | (delete-char 1)) |
| 703 | 703 | ||
| 704 | ;; Tell AUCTeX | 704 | ;; Tell AUCTeX |
| 705 | (when (and reftex-mode | 705 | (when (and reftex-mode |
| 706 | (fboundp 'LaTeX-add-bibitems) | 706 | (fboundp 'LaTeX-add-bibitems) |
| 707 | reftex-plug-into-AUCTeX) | 707 | reftex-plug-into-AUCTeX) |
| 708 | (apply 'LaTeX-add-bibitems (mapcar 'car selected-entries))) | 708 | (apply 'LaTeX-add-bibitems (mapcar 'car selected-entries))) |
| 709 | 709 | ||
| 710 | ;; Produce the cite-view strings | 710 | ;; Produce the cite-view strings |
| 711 | (when (and reftex-mode reftex-cache-cite-echo cite-view) | 711 | (when (and reftex-mode reftex-cache-cite-echo cite-view) |
| 712 | (mapcar (lambda (entry) | 712 | (mapc (lambda (entry) |
| 713 | (reftex-make-cite-echo-string entry docstruct-symbol)) | 713 | (reftex-make-cite-echo-string entry docstruct-symbol)) |
| 714 | selected-entries)) | 714 | selected-entries)) |
| 715 | 715 | ||
| 716 | (message "")) | 716 | (message "")) |
| 717 | 717 | ||
| 718 | (set-marker reftex-select-return-marker nil) | 718 | (set-marker reftex-select-return-marker nil) |
| 719 | (reftex-kill-buffer "*RefTeX Select*") | 719 | (reftex-kill-buffer "*RefTeX Select*") |
| 720 | 720 | ||
| 721 | ;; Check if the prefix arg was numeric, and call recursively | 721 | ;; Check if the prefix arg was numeric, and call recursively |
| 722 | (when (integerp arg) | 722 | (when (integerp arg) |
| 723 | (if (> arg 1) | 723 | (if (> arg 1) |
| 724 | (progn | 724 | (progn |
| 725 | (skip-chars-backward "}") | 725 | (skip-chars-backward "}") |
| 726 | (decf arg) | 726 | (decf arg) |
| 727 | (reftex-do-citation arg)) | 727 | (reftex-do-citation arg)) |
| @@ -954,7 +954,7 @@ While entering the regexp, completion on knows citation keys is possible. | |||
| 954 | reftex-mouse-selected-face | 954 | reftex-mouse-selected-face |
| 955 | nil)) | 955 | nil)) |
| 956 | tmp len) | 956 | tmp len) |
| 957 | (mapcar | 957 | (mapc |
| 958 | (lambda (x) | 958 | (lambda (x) |
| 959 | (setq tmp (cdr (assoc "&formatted" x)) | 959 | (setq tmp (cdr (assoc "&formatted" x)) |
| 960 | len (length tmp)) | 960 | len (length tmp)) |