lei: allow more mbox inode types

We may attempt to write an mbox to any terminal, block, or
character device, not just regular files and FIFOs/pipes.
The only thing that is known to not work is a directory.

Sockets may be possible with some OSes (e.g. Plan 9) or
filesystems.  This fixes t/lei.t on FreeBSD 11.x

1 files changed, 1 insertions, 1 deletions

diff --git a/t/lei.t b/t/lei.t
index 64cb5f0e..d49dc01a 100644
--- a/t/lei.t
+++ b/t/lei.t
@@ -187,7 +187,7 @@ my $test_external = sub {
         is($? >> 8, 1, 'errored out with exit 1');
 
         ok(!$lei->(qw(q s:prefix -f mboxcl2 -o), $home), 'bad mbox');
-        like($err, qr!\Q$home\E exists and is not a regular file!,
+        like($err, qr!\Q$home\E exists and is not a writable file!,
                 'error shown');
         is($? >> 8, 1, 'errored out with exit 1');