lei_mirror: respect `./' and `../' prefixes for CLI args

[public-inbox.git] / lib / PublicInbox / LeiMirror.pm

diff --git a/lib/PublicInbox/LeiMirror.pm b/lib/PublicInbox/LeiMirror.pm
index e0a212dede3268f1b87a5348fcbdcf292ec1fac6..ec2ed557e7d13b32cbf9263ff20cce709e43166f 100644 (file)
--- a/lib/PublicInbox/LeiMirror.pm
+++ b/lib/PublicInbox/LeiMirror.pm
@@ -1055,7 +1055,7 @@ sub do_mirror { # via wq_io_do or public-inbox-clone
                        my ($k) = (split(/\./, $default))[0];
                        my $v = $lei->{opt}->{$k} // next;
                        $v = $default if $v eq '';
-                       $v = "$self->{dst}/$v" if $v !~ m!\A/!;
+                       $v = "$self->{dst}/$v" if $v !~ m!\A\.{0,2}/!;
                        $self->{"-$k"} = $v;
                }
                local $LIVE = {};