# HG changeset patch # User Glenn Morris # Date 1192171161 0 # Node ID dae14770f516bec82b6f06cb540e28614fccc0e1 # Parent 861bd8efa4d6f1bdc3b47d4fcaeadbbe4b691e58 Remove some trailing whitespace. (reftex-do-citation) (reftex-insert-bib-matches): Use mapc rather than mapcar. diff -r 861bd8efa4d6 -r dae14770f516 lisp/textmodes/reftex-cite.el --- a/lisp/textmodes/reftex-cite.el Fri Oct 12 06:37:58 2007 +0000 +++ b/lisp/textmodes/reftex-cite.el Fri Oct 12 06:39:21 2007 +0000 @@ -702,26 +702,26 @@ (delete-char 1)) ;; Tell AUCTeX - (when (and reftex-mode + (when (and reftex-mode (fboundp 'LaTeX-add-bibitems) reftex-plug-into-AUCTeX) (apply 'LaTeX-add-bibitems (mapcar 'car selected-entries))) - + ;; Produce the cite-view strings (when (and reftex-mode reftex-cache-cite-echo cite-view) - (mapcar (lambda (entry) - (reftex-make-cite-echo-string entry docstruct-symbol)) - selected-entries)) + (mapc (lambda (entry) + (reftex-make-cite-echo-string entry docstruct-symbol)) + selected-entries)) (message "")) (set-marker reftex-select-return-marker nil) (reftex-kill-buffer "*RefTeX Select*") - + ;; Check if the prefix arg was numeric, and call recursively (when (integerp arg) (if (> arg 1) - (progn + (progn (skip-chars-backward "}") (decf arg) (reftex-do-citation arg)) @@ -954,7 +954,7 @@ reftex-mouse-selected-face nil)) tmp len) - (mapcar + (mapc (lambda (x) (setq tmp (cdr (assoc "&formatted" x)) len (length tmp))