diff options
author | Eric Wong <e@80x24.org> | 2021-01-15 23:36:23 -1200 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-01-18 09:25:32 +0000 |
commit | 3863b32ecbfb8af20b6650bd134a251a6b290ec7 (patch) | |
tree | fe455e057ef52061963af19e31bb1eee9c7954d0 /lib/PublicInbox/LeiDedupe.pm | |
parent | 15147f7274c34dd5b177a90e9b6f5e86bc86dee3 (diff) | |
download | public-inbox-3863b32ecbfb8af20b6650bd134a251a6b290ec7.tar.gz |
All the augment and deduplication stuff seems to be working based on unit tests. OpPipe is a nice general addition that will probably make future state machines easier.
Diffstat (limited to 'lib/PublicInbox/LeiDedupe.pm')
-rw-r--r-- | lib/PublicInbox/LeiDedupe.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiDedupe.pm b/lib/PublicInbox/LeiDedupe.pm index 81754361..3f478aa4 100644 --- a/lib/PublicInbox/LeiDedupe.pm +++ b/lib/PublicInbox/LeiDedupe.pm @@ -89,8 +89,9 @@ sub true { 1 } sub dedupe_none ($) { (\&true, \&true) } sub new { - my ($cls, $lei, $dst) = @_; + my ($cls, $lei) = @_; my $dd = $lei->{opt}->{dedupe} // 'content'; + my $dst = $lei->{ovv}->{dst}; # allow "none" to bypass Eml->new if writing to directory: return if ($dd eq 'none' && substr($dst // '', -1) eq '/'); |