lei q: disallow "\n" in argv[] elements

I don't expect this to be hit in real-world use via normal
interactive shells.  However, somebody could accidentally add
"\n" in languages (e.g. Perl, C) where it's easy to pass "\n"
in argv[].

1 files changed, 3 insertions, 0 deletions

diff --git a/t/lei.t b/t/lei.t
index f7de1b71..b10c9b59 100644
--- a/t/lei.t
+++ b/t/lei.t
@@ -143,6 +143,9 @@ my $test_fail = sub {
         lei('-C', '/dev/null', 'q', 'whatever');
         is($? >> 8, 1, 'chdir at beginning fails to /dev/null');
 
+        lei_ok('q', "foo\n");
+        like($lei_err, qr/trailing `\\n' removed/s, "noted `\\n' removal");
+
         for my $lk (qw(ei inbox)) {
                 my $d = "$home/newline\n$lk";
                 mkdir $d;