--- grepmail-5.3034/t/nonexistent_mailbox.t 2009-09-02 11:51:28.000000000 +0100 +++ grepmail-5.3034/t/nonexistent_mailbox.t 2009-09-02 13:37:09.000000000 +0100 @@ -149,6 +149,15 @@ my %skip; + $skip{"$^X -MExtUtils::Command -e cat no_such_file 2>" . devnull() . + " | grepmail pattern"} = 'inappropriate for Mail::Mbox::MessageParser >= 1.5002' + if $Mail::Mbox::MessageParser::VERSION >= 1.5002; + + $skip{"$^X -MExtUtils::Command -e cat no_such_file 2>" . devnull() . + " | grepmail -E $single_quote\$email =~ /pattern/$single_quote"} = + 'inappropriate for Mail::Mbox::MessageParser >= 1.5002' + if $Mail::Mbox::MessageParser::VERSION >= 1.5002; + return %skip; }