me
/
guix
Archived
1
0
Fork 0

gnu: sbcl-trivial-mimes: Remove unnecessary phase.

* gnu/packages/lisp-xyz.scm (sbcl-trivial-mimes)[arguments]: Remove
  'fix-paths' phase.
master
Guillaume Le Vaillant 2020-09-14 15:54:51 +02:00
parent 3136fda735
commit e79e9a3bb9
No known key found for this signature in database
GPG Key ID: 6BE8208ADF21FE3F
1 changed files with 0 additions and 14 deletions

View File

@ -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