From: Glenn Morris Date: Sat, 13 Oct 2007 23:01:09 +0000 (+0000) Subject: (reftex-select-item): Use mapc rather than mapcar. X-Git-Tag: emacs-pretest-23.0.90~10341 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=47aad890c4be123dd7f6e0dfe396cc193b5a7afd;p=emacs.git (reftex-select-item): Use mapc rather than mapcar. --- diff --git a/lisp/textmodes/reftex-sel.el b/lisp/textmodes/reftex-sel.el index 4551068af90..d08694c2080 100644 --- a/lisp/textmodes/reftex-sel.el +++ b/lisp/textmodes/reftex-sel.el @@ -418,11 +418,11 @@ During a selection process, these are the local bindings. (set-buffer selection-buffer) (use-local-map nil) (remove-hook 'pre-command-hook 'reftex-select-pre-command-hook t) - (remove-hook 'post-command-hook + (remove-hook 'post-command-hook 'reftex-select-post-command-hook t)) ;; Kill the mark overlays - (mapcar (lambda (c) (reftex-delete-overlay (nth 1 c))) - reftex-select-marked))))) + (mapc (lambda (c) (reftex-delete-overlay (nth 1 c))) + reftex-select-marked))))) (set (make-local-variable 'reftex-last-line) (+ (count-lines (point-min) (point)) (if (bolp) 1 0)))