gnu: cl-fof: Fix build with recent cl-serapeum.

* gnu/packages/lisp-xyz.scm (sbcl-fof)[inputs]: Remove labels and add
  sbcl-named-readtables.
  [arguments]: Add 'fix-build' phase.
This commit is contained in:
Guillaume Le Vaillant 2022-06-14 15:38:21 +02:00
parent 50b6377bc4
commit 0fd660a2b2
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F

View file

@ -15404,20 +15404,25 @@ (define-public sbcl-fof
(substitute* "ffprobe.lisp"
(("\\(defvar \\*ffprobe-command\\* \"ffprobe\"\\)")
(format #f "(defvar *ffprobe-command* \"~a/bin/ffprobe\")"
(assoc-ref inputs "ffmpeg") )))
#t)))))
(assoc-ref inputs "ffmpeg"))))))
(add-after 'unpack 'fix-build
(lambda _
(substitute* "file.lisp"
(("\\(:import-from #:magicffi\\)" all)
(string-append all "(:import-from #:named-readtables)"))))))))
(inputs
`(("alexandria" ,sbcl-alexandria)
("hu.dwim.defclass-star" ,sbcl-hu.dwim.defclass-star)
("local-time" ,sbcl-local-time)
("magicffi" ,sbcl-magicffi)
("osicat" ,sbcl-osicat)
("serapeum" ,sbcl-serapeum)
("str" ,sbcl-cl-str)
("trivia" ,sbcl-trivia)
("trivial-package-local-nicknames" ,sbcl-trivial-package-local-nicknames)
;; Non-CL deps:
("ffmpeg" ,ffmpeg)))
(list sbcl-alexandria
sbcl-hu.dwim.defclass-star
sbcl-local-time
sbcl-magicffi
sbcl-named-readtables
sbcl-osicat
sbcl-serapeum
sbcl-cl-str
sbcl-trivia
sbcl-trivial-package-local-nicknames
;; Non-CL deps:
ffmpeg))
(home-page "https://gitlab.com/ambrevar/fof")
(synopsis "File object finder library for Common Lisp")
(description