02/03: gnu: sbcl-trivial-mimes: Remove unnecessary phase.

[guix-commits]

glv pushed a commit to branch wip-lisp
in repository guix.

commit e79e9a3bb9b3310f94a5753e376f24c981032533
Author: Guillaume Le Vaillant <glv@posteo.net>
AuthorDate: Mon Sep 14 15:54:51 2020 +0200

    gnu: sbcl-trivial-mimes: Remove unnecessary phase.
    
    * gnu/packages/lisp-xyz.scm (sbcl-trivial-mimes)[arguments]: Remove
      'fix-paths' phase.
---
 gnu/packages/lisp-xyz.scm | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 12102dc..2e280cc 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -3967,20 +3967,6 @@ Long Painful History of Time\".")
          (sha256
           (base32 "17jxgl47r695bvsb7wi3n2ws5rp1zzgvw0zii8cy5ggw4b4ayv6m"))))
       (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
        `(("stefil" ,sbcl-hu.dwim.stefil)))
       (inputs