aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2007-10-12 06:39:21 +0000
committerGlenn Morris2007-10-12 06:39:21 +0000
commit551e625ffe12c7189ac631326dc8d4a7f06d8b0f (patch)
tree903006fab83bd432fb72678dbdd41b16af746e3e
parentfe2ca5ece2678c45c9643f7b062746665980f40d (diff)
downloademacs-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.el16
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))