diff --git a/ChangeLog b/ChangeLog
index 4be9e08..9a52619 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,11 @@
 
 ===== ChangeLog of Mail::Box version 3.*
 
+version 3.004: Fri 22 Dec 09:46:28 CET 2017
+
+	Fixes:
+	- minor change in Mail::Message broken regression test [cpantesters]
+
 version 3.003: Thu 29 Jun 15:18:15 CEST 2017
 
 	Fixes:
diff --git a/Makefile.PL b/Makefile.PL
index 4fbdd0d..b664c12 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -4,7 +4,7 @@ require 5.010;
 
 use IO::Handle;
 
-my $VERSION = '3.003';
+my $VERSION = '3.004';
 
 my %prereq =
  ( Carp           => 0
@@ -19,7 +19,7 @@ my %prereq =
  , File::Copy     => 0
  , File::Remove   => 0.20
  , IO::Scalar     => 0
- , Mail::Message  => 3.0
+ , Mail::Message  => 3.005
  , Mail::Transport => 3.0
  , Object::Realize::Later => 0.19
  , POSIX          => 0
diff --git a/t/501parser-head.t b/t/501parser-head.t
index c4ab16a..0c69ce0 100755
--- a/t/501parser-head.t
+++ b/t/501parser-head.t
@@ -42,7 +42,7 @@ cmp_ok(@received, "==", 5);
 my $received = $head->get('received');  #last
 ok(defined $received);
 is($received->name, 'received');
-my $recb = "(from majordomo\@localhost)\tby unca-don.wizards.dupont.com (8.9.3/8.9.3) id PAA29389\tfor magick-outgoing";
+my $recb = "(from majordomo\@localhost) by unca-don.wizards.dupont.com (8.9.3/8.9.3) id PAA29389 for magick-outgoing";
 
 is($received->body, $recb);
 is($received->comment, 'Wed, 9 Feb 2000 15:38:42 -0500 (EST)');