diff options
| author | Andy Patterson <ajpatter@uwaterloo.ca> | 2017-04-08 23:48:38 -0400 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2017-05-16 15:18:15 +0200 |
| commit | 457702b1d9bea593d51e5187b2f104d553fafce4 (patch) | |
| tree | ec90d139078925e16d625078b6f552181bbe6024 /guix/build/lisp-utils.scm | |
| parent | b4c9f0c50de39da253dadfde9e85de06d665cd1e (diff) | |
| download | guix-patches-457702b1d9bea593d51e5187b2f104d553fafce4.tar guix-patches-457702b1d9bea593d51e5187b2f104d553fafce4.tar.gz | |
build-system/asdf: Pass the system name as an argument to the builder.
* guix/build-system/asdf.scm (asdf-build): Use the user-defined system name,
or calculate it from the package's full name.
[builder]: Pass the value along to the build procedure.
(package-with-build-system): Remove #:asd-system-name from source packages'
arguments.
* guix/build/asdf-build-system.scm: Adjust accordingly.
* guix/build/lisp-utils.scm (remove-lisp-from-name): Delete variable.
Diffstat (limited to 'guix/build/lisp-utils.scm')
| -rw-r--r-- | guix/build/lisp-utils.scm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/guix/build/lisp-utils.scm b/guix/build/lisp-utils.scm index 148357bf0e..2d730570a1 100644 --- a/guix/build/lisp-utils.scm +++ b/guix/build/lisp-utils.scm @@ -36,7 +36,6 @@ generate-executable-for-system %bundle-install-prefix bundle-asd-file - remove-lisp-from-name wrap-output-translations prepend-to-source-registry build-program @@ -66,9 +65,6 @@ (define (%bundle-install-prefix) (string-append %source-install-prefix "/" (%lisp-type) "-bundle-systems")) -(define (remove-lisp-from-name name lisp) - (string-drop name (1+ (string-length lisp)))) - (define (inputs->asd-file-map inputs) "Produce a hash table of the form (system . asd-file), where system is the name of an ASD system, and asd-file is the full path to its definition." |