ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 21:59:08 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Actually run 'tests/guix-environment-container.sh'.

Browse source 
This test was skipped since the switch to Guile 3 because
'assert-container-features' would be inlined and thus accessing it with
@@ would fail with an unbound-variable error.

* guix/scripts/environment.scm (assert-container-features): Export.
* tests/guix-environment-container.sh: Use single '@'.
This commit is contained in:
Ludovic Courtès 2020-06-20 12:54:05 +02:00
parent cdea526556
commit 90f496be9a
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
guix/scripts/environment.scm
View file

@ -48,7 +48,8 @@ (define-module (guix scripts environment)
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)
#:use-module (srfi srfi-37) #:use-module (srfi srfi-37)
#:use-module (srfi srfi-98) #:use-module (srfi srfi-98)
#:export (guix-environment)) #:export (assert-container-features
guix-environment))
;; Protect some env vars from purification. Borrowed from nix-shell. ;; Protect some env vars from purification. Borrowed from nix-shell.
(define %precious-variables (define %precious-variables

2
tests/guix-environment-container.sh
View file

@ -24,7 +24,7 @@ set -e
guix environment --version guix environment --version
if ! guile -c '((@@ (guix scripts environment) assert-container-features))' if ! guile -c '((@ (guix scripts environment) assert-container-features))'
then then
# User containers are not supported; skip this test. # User containers are not supported; skip this test.
exit 77 exit 77