From 89dbc921370c273f691bb544a03f0164ed6de950 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Mon, 9 Mar 2026 11:37:24 +0000 Subject: [PATCH] Restore use of cl-member-if and cl-plusp to flymake.el * lisp/progmodes/flymake.el (flymake-goto-next-error): Use cl-member-if not member-if and cl-plusp not plusp because this is a `:core' ELPA package (bug#79930). --- lisp/progmodes/flymake.el | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index 888f268429b..cf64e3de064 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -1624,13 +1624,15 @@ default) no filter is applied." finally (cl-return (cl-sort retval (if (cl-plusp n) #'< #'>) :key #'overlay-start)))) - (tail (member-if (lambda (ov) - (if (plusp n) - (> (overlay-start ov) - (point)) - (< (overlay-start ov) - (point)))) - ovs)) + (tail ;; For compatibility with older Emacs. + (with-suppressed-warnings ((obsolete cl-member-if)) + (cl-member-if (lambda (ov) + (if (cl-plusp n) + (> (overlay-start ov) + (point)) + (< (overlay-start ov) + (point)))) + ovs))) (chain (if flymake-wrap-around (if tail (progn (setcdr (last tail) ovs) tail)