diff options
Diffstat (limited to 'lib/Feed/Role/DeDupe.pm')
| -rw-r--r-- | lib/Feed/Role/DeDupe.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Feed/Role/DeDupe.pm b/lib/Feed/Role/DeDupe.pm index 4e470d7..4c0c6d0 100644 --- a/lib/Feed/Role/DeDupe.pm +++ b/lib/Feed/Role/DeDupe.pm @@ -144,12 +144,12 @@ sub mark_seen { sub _entry_id { my ($self,$e) = @_; - my $id = $e->id // $e->link; + my $id = $e->unified_id; $self->log->trace("_entry_id: $id"); if ($self->dedupe_use_date) { - my $date = $e->modified // $e->issued; + my $date = $e->unified_date; if ($date) { $id .= '-' . $date->iso8601; $self->log->trace("_entry_id: (with date) $id"); @@ -157,7 +157,7 @@ sub _entry_id { } if ($self->dedupe_use_body) { - my $body = $e->content->body; + my $body = $e->unified_content->body; if ($body) { my $content_digest = sha1_base64(encode('utf-8',$body)); $id .= '-' . $content_digest; |