about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2023-10-17 23:38:07 +0000
committerEric Wong <e@80x24.org>2023-10-18 20:50:37 +0000
commitbd2dff9301db686ed013e4d8cf6319fe0b06e5e5 (patch)
tree9feb178bf88282fda4259c90eba8978d301a40d7 /t
parent3829004faab901fabbda922a1900842e51812ff0 (diff)
downloadpublic-inbox-bd2dff9301db686ed013e4d8cf6319fe0b06e5e5.tar.gz
It's actually valid Perl syntax, but still confusing to look at.

Fixes: add90b9504f4 ("support -C (chdir) for most non-daemon commands")
Diffstat (limited to 't')
-rw-r--r--t/init.t7
1 files changed, 7 insertions, 0 deletions
diff --git a/t/init.t b/t/init.t
index abe3a372..177c22b6 100644
--- a/t/init.t
+++ b/t/init.t
@@ -216,6 +216,13 @@ SKIP: {
         is($n, 13, 'V1 NNTP article numbers skipped via --skip-artnum');
 }
 
+{
+        my $cmd = [ qw(-init -C), "$tmpdir", qw(chdirlist chdirlist),
+                   qw(http://example.com/chdirlist chdirlist@example.com)];
+        ok(run_script($cmd), '-init with -C (chdir)');
+        ok(-d "$tmpdir/chdirlist", '-C processed correctly');
+}
+
 done_testing();
 
 sub read_indexlevel {