Mercurial > emacs
changeset 85282:f89fc9388782
(idlwave-complete-in-buffer): Use mapc rather than mapcar.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sat, 13 Oct 2007 22:55:36 +0000 |
parents | 7d48c6241478 |
children | 3c4d466f6fec |
files | lisp/progmodes/idlwave.el |
diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/idlwave.el Sat Oct 13 22:55:09 2007 +0000 +++ b/lisp/progmodes/idlwave.el Sat Oct 13 22:55:36 2007 +0000 @@ -6785,12 +6785,12 @@ (message "Making completion list...") (unless idlwave-completion-help-links ; already set somewhere? - (mapcar (lambda (x) ; Pass link prop through to highlight-linked - (let ((link (get-text-property 0 'link (car x)))) - (if link - (push (cons (car x) link) - idlwave-completion-help-links)))) - list)) + (mapc (lambda (x) ; Pass link prop through to highlight-linked + (let ((link (get-text-property 0 'link (car x)))) + (if link + (push (cons (car x) link) + idlwave-completion-help-links)))) + list)) (let* ((list all-completions) ;; "complete" means, this is already a valid completion (complete (memq spart all-completions))