procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

5
lisp/doc-view.el
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)