1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

lisp/doc-view.el: Silence compiler warning.

This commit is contained in:
Juanma Barranquero 2011-06-05 02:18:46 +02:00
parent 989bf36895
commit 8eda563d1e
2 changed files with 8 additions and 2 deletions

View file

@ -1,3 +1,8 @@
2011-06-05 Juanma Barranquero <lekktu@gmail.com>
* doc-view.el (doc-view-remove-if): Move computation of result out
of `dolist' to silence misleading lexical-binding warning.
2011-06-04 Chong Yidong <cyd@stupidchicken.com>
* emacs-lisp/timer.el (timer-activate): Remove unused arg.

View file

@ -614,9 +614,10 @@ It's a subdirectory of `doc-view-cache-directory'."
(defun doc-view-remove-if (predicate list)
"Return LIST with all items removed that satisfy PREDICATE."
(let (new-list)
(dolist (item list (nreverse new-list))
(dolist (item list)
(when (not (funcall predicate item))
(setq new-list (cons item new-list))))))
(setq new-list (cons item new-list))))
(nreverse new-list)))
;;;###autoload
(defun doc-view-mode-p (type)