mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
tests: Warn about test module load failures.
Reported by Clément Lassieur <clement@lassieur.org> and Leo Famulari <leo@famulari.name> at <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=32545#11>. * gnu/tests.scm (test-modules): Pass #:warn to 'scheme-modules'.
This commit is contained in:
parent
de5cbd4a38
commit
d258c79144
1 changed files with 3 additions and 1 deletions
|
@ -22,6 +22,7 @@ (define-module (gnu tests)
|
||||||
#:use-module (guix gexp)
|
#:use-module (guix gexp)
|
||||||
#:use-module (guix utils)
|
#:use-module (guix utils)
|
||||||
#:use-module (guix records)
|
#:use-module (guix records)
|
||||||
|
#:use-module ((guix ui) #:select (warn-about-load-error))
|
||||||
#:use-module (gnu bootloader)
|
#:use-module (gnu bootloader)
|
||||||
#:use-module (gnu bootloader grub)
|
#:use-module (gnu bootloader grub)
|
||||||
#:use-module (gnu system)
|
#:use-module (gnu system)
|
||||||
|
@ -258,7 +259,8 @@ (define (write-system-test test port)
|
||||||
(define (test-modules)
|
(define (test-modules)
|
||||||
"Return the list of modules that define system tests."
|
"Return the list of modules that define system tests."
|
||||||
(scheme-modules (dirname (search-path %load-path "guix.scm"))
|
(scheme-modules (dirname (search-path %load-path "guix.scm"))
|
||||||
"gnu/tests"))
|
"gnu/tests"
|
||||||
|
#:warn warn-about-load-error))
|
||||||
|
|
||||||
(define (fold-system-tests proc seed)
|
(define (fold-system-tests proc seed)
|
||||||
"Invoke PROC on each system test, passing it the test and the previous
|
"Invoke PROC on each system test, passing it the test and the previous
|
||||||
|
|
Loading…
Reference in a new issue