02/04: gnu: sbcl-trivial-mimes: Fix 'fix-paths' phase.

[guix-commits]

ambrevar pushed a commit to branch master
in repository guix.

commit 55af9fe0f4cee368565ffdc5a07856ee8674a26f
Author: Guillaume Le Vaillant <address@hidden>
Date:   Thu Oct 17 16:43:10 2019 +0200

    gnu: sbcl-trivial-mimes: Fix 'fix-paths' phase.
    
    * gnu/packages/lisp.scm (sbcl-trivial-mimes)[arguments]: Use '(%lisp-type)'
      instead of hard coded 'sbcl' in 'fix-paths' phase.
---
 gnu/packages/lisp.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/lisp.scm b/gnu/packages/lisp.scm
index 77b36ef..6c4491a 100644
--- a/gnu/packages/lisp.scm
+++ b/gnu/packages/lisp.scm
@@ -5132,7 +5132,9 @@ performance and simplicity in mind.")
                    ((anchor all)
                     (string-append
                      anchor "\n"
-                     "(asdf:system-relative-pathname :trivial-mimes 
\"../../share/common-lisp/sbcl-source/trivial-mimes/mime.types\")")))))))))
+                     "(asdf:system-relative-pathname :trivial-mimes "
+                     "\"../../share/common-lisp/" (%lisp-type)
+                     "-source/trivial-mimes/mime.types\")")))))))))
       (native-inputs
        `(("stefil" ,sbcl-hu.dwim.stefil)))
       (inputs