mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-05-28 20:12:11 +02:00
environment: Support package transformation options.
Fixes <https://bugs.gnu.org/33776>. Reported by Adrien Guilbaud <adrien.guilbaud@inria.fr>. * guix/scripts/environment.scm (show-help): Add call to 'show-transformation-options-help'. (%options): Add %TRANSFORMATION-OPTIONS. (options/resolve-packages): Add 'store' parameter. [transform, package->manifest-entry*]: New procedures. Use 'package->manifest-entry*' instead of 'package->manifest-entry'. (guix-environment): Move definition of 'manifest' within 'with-store'. * tests/guix-environment.sh: Add test.
This commit is contained in:
committed by
Ludovic Courtès
parent
bafcf1f32f
commit
a93c160631
@@ -1,5 +1,5 @@
|
||||
# GNU Guix --- Functional package management for GNU
|
||||
# Copyright © 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org>
|
||||
# Copyright © 2015, 2016, 2017, 2018 Ludovic Courtès <ludo@gnu.org>
|
||||
#
|
||||
# This file is part of GNU Guix.
|
||||
#
|
||||
@@ -118,6 +118,18 @@ fi
|
||||
# in its profile (e.g., for 'gzip'), but we have to accept them.
|
||||
guix environment guix --bootstrap -n
|
||||
|
||||
# Try program transformation options.
|
||||
mkdir "$tmpdir/emacs-36.8"
|
||||
drv="`guix environment --ad-hoc emacs -n 2>&1 | grep 'emacs.*\.drv'`"
|
||||
transformed_drv="`guix environment --ad-hoc emacs --with-source="$tmpdir/emacs-36.8" -n 2>&1 | grep 'emacs.*\.drv'`"
|
||||
test -n "$drv"
|
||||
test "$drv" != "$transformed_drv"
|
||||
case "$transformed_drv" in
|
||||
*-emacs-36.8.drv) true;;
|
||||
*) false;;
|
||||
esac
|
||||
rmdir "$tmpdir/emacs-36.8"
|
||||
|
||||
if guile -c '(getaddrinfo "www.gnu.org" "80" AI_NUMERICSERV)' 2> /dev/null
|
||||
then
|
||||
# Compute the build environment for the initial GNU Make.
|
||||
|
||||
Reference in New Issue
Block a user