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:
parent
989bf36895
commit
8eda563d1e
2 changed files with 8 additions and 2 deletions
|
|
@ -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.
|
||||
|
|
|
|||
|
|
@ -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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue