We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents aeccf46 + e5051e9 commit a5ca554Copy full SHA for a5ca554
lib/Kalaclista/Data/Entry.pm
@@ -30,6 +30,8 @@ class Kalaclista::Data::Entry {
30
method dom { $dom }
31
method meta { $meta }
32
33
+ method updated { $self->lastmod // $self->date }
34
+
35
method clone {
36
my $class = ref($self);
37
my %overrides = @_;
t/Kalaclista-Data-Entry/10_common.t
@@ -31,6 +31,7 @@ subtest common => sub {
is $entry->draft, false;
is $entry->date, '2024-01-01T00:00:00';
is $entry->lastmod, '2024-02-01T00:00:00';
+ is $entry->updated, '2024-02-01T00:00:00';
is $entry->href->to_string, 'https://example.com/entry';
is $entry->dom, undef;
is $entry->src, '';
0 commit comments