From 86f7c7f6b63b24210ec3ed3e88d9d0f53d33f805 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 28 Dec 2019 15:27:03 +0000
Subject: naive-bayes classifying index

half-tested by hand
---
 t/parser.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 't')

diff --git a/t/parser.t b/t/parser.t
index aafbb27..49be92e 100644
--- a/t/parser.t
+++ b/t/parser.t
@@ -5,12 +5,12 @@ use MaildirIndexer::Parser;
 use MaildirIndexer::Email;
 
 subtest 'from string' => {
-    is-deeply parse-email(''), Nil, "empty string won't parse";
+    ok !parse-email(''), "empty string won't parse";
 
     my $message = q:to<EOM>;
     bad stuff
     EOM
-    is-deeply parse-email($message), Nil, "bad message won't parse";
+    ok !parse-email($message), "bad message won't parse";
 
     $message = q:to<EOM>;
     Head: value
-- 
cgit v1.2.3