about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-04-17 19:00:53 +0000
committerEric Wong <e@80x24.org>2021-04-17 20:16:46 +0000
commit9c08efbbdb078f403feb1f9821fb13f12d868244 (patch)
treeda8da276adf55d91088a5792861c726a342c60d4 /t
parent74cac24c6238c73279a82f18c7a6f11d387756bb (diff)
downloadpublic-inbox-9c08efbbdb078f403feb1f9821fb13f12d868244.tar.gz
We want to be able to use "lei up ." when inside a Maildir.
We'll also relax Maildir/mbox basenames to be any non-'/'
character after converting relative paths to absolute.  The
old restriction on allowed characters was unnecessary and made
it impossible to reliably map "." when used as the sole argument
for "lei up".
Diffstat (limited to 't')
-rw-r--r--t/lei-q-save.t4
1 files changed, 4 insertions, 0 deletions
diff --git a/t/lei-q-save.t b/t/lei-q-save.t
index 6389825f..a8eda41e 100644
--- a/t/lei-q-save.t
+++ b/t/lei-q-save.t
@@ -29,6 +29,8 @@ test_lei(sub {
         lei_ok [qw(import -q -F eml -)], undef, { 0 => \$in, %$lei_opt };
         opendir my $dh, '.' or xbail "opendir .: $!";
         lei_ok qw(up -q md -C), $home;
+        lei_ok qw(up -q . -C), "$home/md";
+        lei_ok qw(up -q), "/$home/md";
         chdir($dh) or xbail "fchdir . $!";
         my %after = map { $_ => 1 } glob("$home/md/cur/*");
         is(delete $after{(keys(%before))[0]}, 1, 'original message kept');
@@ -51,5 +53,7 @@ test_lei(sub {
         lei_ok [qw(import -q -F eml -)], undef, { 0 => \$in, %$lei_opt };
         lei_ok([qw(up mbcl2)], undef, { -C => $home, %$lei_opt });
         ok(-s "$home/mbcl2" > $size, 'size increased after up');
+
+        ok(!lei(qw(up -q), $home), 'up fails w/o --save');
 });
 done_testing;