mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/ibuf-ext.el (ibuffer-remove-alist): Simplify.

Browse source
This commit is contained in:
Stefan Kangas 2022-08-09 19:42:07 +02:00
parent 47aa2317c3
commit 0bc2079ce6
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/ibuf-ext.el
View file

@ -48,9 +48,7 @@
;;; Utility functions
(defun ibuffer-remove-alist (key alist)
"Remove all entries in ALIST that have a key equal to KEY."
(while (when-let ((it (assoc key alist)))
(setq alist (remove it alist)) it))
alist)
(assoc-delete-all key (copy-sequence alist)))
(defun ibuffer-split-list (fn elts)
(declare (obsolete seq-group-by "29.1"))