tests: pack: Fix indentation.

* tests/pack.scm: Fix indentation.
This commit is contained in:
Maxim Cournoyer 2023-02-02 14:43:58 -05:00
parent 68380db4c4
commit ac1d530d56
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 121 additions and 126 deletions

View File

@ -74,8 +74,7 @@
-> "bin/guile"))
#:compressor %gzip-compressor
#:archiver %tar-bootstrap))
(check (gexp->derivation
"check-tarball"
(check (gexp->derivation "check-tarball"
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils)
@ -131,8 +130,7 @@
#:locales? #f))
(tarball (self-contained-tarball "tar-pack" profile
#:localstatedir? #t))
(check (gexp->derivation
"check-tarball"
(check (gexp->derivation "check-tarball"
#~(let ((bin (string-append "." #$profile "/bin")))
(setenv "PATH"
(string-append #$%tar-bootstrap "/bin"))
@ -154,8 +152,7 @@
("λ" regular (data "lambda")))))
(tarball (self-contained-tarball "tar-pack" tree
#:localstatedir? #t))
(check (gexp->derivation
"check-tarball"
(check (gexp->derivation "check-tarball"
(with-extensions (list guile-sqlite3 guile-gcrypt)
(with-imported-modules (source-module-closure
'((guix store database)))
@ -206,8 +203,7 @@
(tarball (docker-image "docker-pack" profile
#:symlinks '(("/bin/Guile" -> "bin/guile"))
#:localstatedir? #t))
(check (gexp->derivation
"check-tarball"
(check (gexp->derivation "check-tarball"
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils)
@ -247,8 +243,7 @@
(image (squashfs-image "squashfs-pack" profile
#:symlinks '(("/bin" -> "bin"))
#:localstatedir? #t))
(check (gexp->derivation
"check-tarball"
(check (gexp->derivation "check-tarball"
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils)