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

* lisp/subr.el (filter): Remove. Use cl-remove-if-not' or seq-filter'.

Browse source
This commit is contained in:
Stefan Monnier 2014-12-04 15:57:23 -05:00
parent 6194477a62
commit d08f4f8fc5
2 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2014-12-04 Stefan Monnier <monnier@iro.umontreal.ca>
* subr.el (filter): Remove. Use `cl-remove-if-not' or `seq-filter'.
2014-12-04 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/shr.el (shr--extract-best-source): Ignore non-text children.

5
lisp/subr.el
View file

@ -222,11 +222,6 @@ Then evaluate RESULT to get return value, default nil.
,@(if (cdr (cdr spec))
`((setq ,(car spec) nil) ,@(cdr (cdr spec))))))))
(defmacro filter (condp lst)
"Return the list consisting of elements in LST for which CONDP is not nil."
`(delq nil
(mapcar (lambda (x) (and (funcall ,condp x) x)) ,lst)))
(defmacro dotimes (spec &rest body)
"Loop a certain number of times.
Evaluate BODY with VAR bound to successive integers running from 0,