# NOTE: Derived from web_diary_dir/lib/DateTime/Date.pm.
# Changes made here will be lost when autosplit again.
# See AutoSplit.pm.
package DateTime::Date;

#line 169 "web_diary_dir/lib/DateTime/Date.pm (autosplit into web_diary_dir/lib/auto/DateTime/Date/Dup.al)"
sub Dup($)
{
    my $self = shift;

    my $class = ref $self;
    my $dup = new $class;
    $dup->year($self->year);
    $dup->month($self->month);
    $dup->day($self->day);
    return $dup;
}

# end of DateTime::Date::Dup
1;
