-# Copyright (C) 2020 all contributors <meta@public-inbox.org>
+# Copyright (C) 2020-2021 all contributors <meta@public-inbox.org>
# License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
package PublicInbox::LeiDedupe;
use strict;
sub dedupe_none () { (undef, sub { 1 }) }
sub new {
- my ($cls, $lei) = @_;
+ my ($cls, $lei, $dst) = @_;
my $dd = $lei->{opt}->{dedupe} // 'content';
+
+ # allow "none" to bypass Eml->new if writing to directory:
+ return if ($dd eq 'none' && substr($dst // '', -1) eq '/');
+
my $dd_new = $cls->can("dedupe_$dd") //
die "unsupported dedupe strategy: $dd\n";
bless [ $dd_new->() ], $cls; # [ $skv, $cb ]