Browse Source

tests: Fix etc/profile test.

* tests/profiles.scm ("etc/profile"): Unset GUIX_PROFILE before sourcing
  etc/profile.  Use '.' instead of 'source' for sourcing.  Call 'echo $PATH'
  instead of using the output of 'set' to determine whether PATH is set.
version-0.8.3
Taylan Ulrich Bayırlı/Kammer 7 years ago
parent
commit
9e006fb3de
  1. 14
      tests/profiles.scm

14
tests/profiles.scm

@ -237,14 +237,16 @@
(mbegin %store-monad
(built-derivations (list drv))
(let* ((pipe (open-input-pipe
(string-append "source "
profile "/etc/profile; "
"unset GUIX_PROFILE; set")))
(env (get-string-all pipe)))
(string-append "unset GUIX_PROFILE; "
;; 'source' is a Bashism; use '.' (dot).
". " profile "/etc/profile; "
;; Don't try to parse set(1) output because
;; it differs among shells; just use echo.
"echo $PATH")))
(path (get-string-all pipe)))
(return
(and (zero? (close-pipe pipe))
(string-contains env
(string-append "PATH=" profile "/bin"))))))))
(string-contains path (string-append profile "/bin"))))))))
(test-end "profiles")

Loading…
Cancel
Save