gnu: sbcl-trivial-mimes: Remove unnecessary phase.
* gnu/packages/lisp-xyz.scm (sbcl-trivial-mimes)[arguments]: Remove 'fix-paths' phase.master
parent
3136fda735
commit
e79e9a3bb9
|
@ -3967,20 +3967,6 @@ Long Painful History of Time\".")
|
||||||
(sha256
|
(sha256
|
||||||
(base32 "17jxgl47r695bvsb7wi3n2ws5rp1zzgvw0zii8cy5ggw4b4ayv6m"))))
|
(base32 "17jxgl47r695bvsb7wi3n2ws5rp1zzgvw0zii8cy5ggw4b4ayv6m"))))
|
||||||
(build-system asdf-build-system/sbcl)
|
(build-system asdf-build-system/sbcl)
|
||||||
(arguments
|
|
||||||
'(#:phases
|
|
||||||
(modify-phases %standard-phases
|
|
||||||
(add-after
|
|
||||||
'unpack 'fix-paths
|
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
|
||||||
(let ((anchor "#p\"/etc/mime.types\""))
|
|
||||||
(substitute* "mime-types.lisp"
|
|
||||||
((anchor all)
|
|
||||||
(string-append
|
|
||||||
anchor "\n"
|
|
||||||
"(asdf:system-relative-pathname :trivial-mimes "
|
|
||||||
"\"../../share/common-lisp/" (%lisp-type)
|
|
||||||
"-source/trivial-mimes/mime.types\")")))))))))
|
|
||||||
(native-inputs
|
(native-inputs
|
||||||
`(("stefil" ,sbcl-hu.dwim.stefil)))
|
`(("stefil" ,sbcl-hu.dwim.stefil)))
|
||||||
(inputs
|
(inputs
|
||||||
|
|
Reference in New Issue