diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-04-30 17:06:00 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-04-30 17:06:00 +0200 |
| commit | 0734a9a8131525d6da2e7bf802402dc0350eda98 (patch) | |
| tree | f43bef210f6513b12c14ee9494bb47e4f80e99d0 /tests/guix-package.sh | |
| parent | e0fbbc889d724678e9e310432ad3a3fb8345cf9a (diff) | |
| parent | 01155b1808b17f0a4f54388261ab0c6f5fee2f1b (diff) | |
Merge branch 'core-updates'
Diffstat (limited to 'tests/guix-package.sh')
| -rw-r--r-- | tests/guix-package.sh | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/guix-package.sh b/tests/guix-package.sh index 7b101aa501..5a514a0dc0 100644 --- a/tests/guix-package.sh +++ b/tests/guix-package.sh @@ -47,6 +47,10 @@ test -L "$profile" && test -L "$profile-1-link" ! test -f "$profile-2-link" test -f "$profile/bin/guile" +# No search path env. var. here. +guix package --search-paths -p "$profile" +test "`guix package --search-paths -p "$profile" | wc -l`" = 0 + # Check whether we have network access. if guile -c '(getaddrinfo "www.gnu.org" "80" AI_NUMERICSERV)' 2> /dev/null then @@ -119,6 +123,10 @@ then rm "$profile-1-link" guix package --bootstrap -p "$profile" --roll-back test "`readlink_base "$profile"`" = "$profile-0-link" + + # Make sure LIBRARY_PATH gets listed by `--search-paths'. + guix package --bootstrap -p "$profile" -i guile-bootstrap -i gcc-bootstrap + guix package --search-paths -p "$profile" | grep LIBRARY_PATH fi # Make sure the `:' syntax works. |