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

#line 131 "web_diary_dir/lib/DateTime/Time.pm (autosplit into web_diary_dir/lib/auto/DateTime/Time/IsValid.al)"
sub IsValid ($)
{
    my $self = shift;
    return 0 unless $self->SUPER::IsValid;
    return 0 if $self->hour < 0 || $self->hour >= 24;
    return 0 if $self->min < 0 || $self->month >= 60;
    return 0 if $self->sec < 0 || $self->sec >= 60;
    return 1;
}

# end of DateTime::Time::IsValid
1;
