Skip to content

Commit

Permalink
Use mapcan instead of cl-mapcan
Browse files Browse the repository at this point in the history
This was added in Emacs 26.1.
  • Loading branch information
tarsius committed Nov 23, 2024
1 parent c4f5a04 commit cb104ca
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions lisp/epkg-elpa.el
Original file line number Diff line number Diff line change
Expand Up @@ -297,10 +297,10 @@ NAME is the name of a package, a string. ELPA is one of `gnu',
,@(if (memq type '(git hg))
(list :url (oref rcp url))
(list :repo (oref rcp repo)))
,@(cl-mapcan (lambda (slot)
(and-let* ((value (eieio-oref rcp slot)))
(list (intern (format ":%s" slot)) value)))
'(files branch commit version-regexp old-names)))))
,@(mapcan (lambda (slot)
(and-let* ((value (eieio-oref rcp slot)))
(list (intern (format ":%s" slot)) value)))
'(files branch commit version-regexp old-names)))))

(defun epkg-melpa--recipe-type (rcp)
(intern (substring (symbol-name (eieio-object-class-name rcp)) 6 -7)))
Expand Down

0 comments on commit cb104ca

Please sign in to comment.