amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: cl-fof: Update to 0.2.0-1.522879e.

Browse source 
* gnu/packages/lisp-xyz.scm (sbcl-fof): Update to 0.2.0-1.522879e.
  [inputs]: Sort inputs.
  [arguments]: Remove 'fix-build' phase.
This commit is contained in:
Guillaume Le Vaillant 2022-06-14 16:18:07 +02:00
parent d1f3bba66c
commit 99c43cf344
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F
1 changed files with 42 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

21
gnu/packages/lisp-xyz.scm
View file

@ -15382,18 +15382,20 @@ return the CPU count of the current system.")
(sbcl-package->cl-source-package sbcl-cl-cpus)) (sbcl-package->cl-source-package sbcl-cl-cpus))
(define-public sbcl-fof (define-public sbcl-fof
(let ((commit "522879e7da110ecf2e841998b197b34062c54b29")
(revision "1"))
(package (package
(name "sbcl-fof") (name "sbcl-fof")
(version "0.2.0") (version (git-version "0.2.0" revision commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://gitlab.com/ambrevar/fof") (url "https://gitlab.com/ambrevar/fof")
(commit version))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name "cl-fof" version))
(sha256 (sha256
(base32 "0j64b7p40h8bq33hqkpgakm3vs1607vyx6n48d7qg3287v1akk6m")))) (base32 "0ipy51q2fw03xk9rqcyzbq2b9c32npc1gl3c53rdjywpak7zwwg6"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(arguments (arguments
`(#:phases `(#:phases
@ -15403,21 +15405,16 @@ return the CPU count of the current system.")
(substitute* "ffprobe.lisp" (substitute* "ffprobe.lisp"
(("\\(defvar \\*ffprobe-command\\* \"ffprobe\"\\)") (("\\(defvar \\*ffprobe-command\\* \"ffprobe\"\\)")
(format #f "(defvar *ffprobe-command* \"~a/bin/ffprobe\")" (format #f "(defvar *ffprobe-command* \"~a/bin/ffprobe\")"
(assoc-ref inputs "ffmpeg")))))) (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 (inputs
(list sbcl-alexandria (list sbcl-alexandria
sbcl-cl-str
sbcl-hu.dwim.defclass-star sbcl-hu.dwim.defclass-star
sbcl-local-time sbcl-local-time
sbcl-magicffi sbcl-magicffi
sbcl-named-readtables sbcl-named-readtables
sbcl-osicat sbcl-osicat
sbcl-serapeum sbcl-serapeum
sbcl-cl-str
sbcl-trivia sbcl-trivia
sbcl-trivial-package-local-nicknames sbcl-trivial-package-local-nicknames
;; Non-CL deps: ;; Non-CL deps:
@ -15431,7 +15428,7 @@ It aims at replacing Unix tools such as @code{find} or @code{du}.
It also offers a replacement to the @code{pathname} Common Lisp API. It also offers a replacement to the @code{pathname} Common Lisp API.
Slot writers which commit changes to disk, e.g. permissions, modification Slot writers which commit changes to disk, e.g. permissions, modification
time, etc.") time, etc.")
(license license:gpl3+))) (license license:gpl3+))))
(define-public ecl-fof (define-public ecl-fof
(sbcl-package->ecl-package sbcl-fof)) (sbcl-package->ecl-package sbcl-fof))