diff options
Diffstat (limited to 'gnu/tests/mail.scm')
| -rw-r--r-- | gnu/tests/mail.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gnu/tests/mail.scm b/gnu/tests/mail.scm index dc1f18b3f1..dcb8f08ea8 100644 --- a/gnu/tests/mail.scm +++ b/gnu/tests/mail.scm @@ -382,7 +382,9 @@ Subject: Hello Nice to meet you!") (marionette-eval '(begin (use-modules (ice-9 ftw) - (ice-9 match)) + (ice-9 match) + (rnrs io ports)) + (let ((TESTBOX/new "/home/alice/Maildir/TESTBOX/new/")) (match (scandir TESTBOX/new) (("." ".." message-file) @@ -556,7 +558,9 @@ Subject: Hello Nice to meet you!") (marionette-eval '(begin (use-modules (ice-9 ftw) - (ice-9 match)) + (ice-9 match) + (rnrs io ports)) + (let ((TESTBOX/new "/home/alice/TestMaildir/new/")) (match (scandir TESTBOX/new) (("." ".." message-file) |