# 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 408 "web_diary_dir/lib/DateTime/Date.pm (autosplit into web_diary_dir/lib/auto/DateTime/Date/month_string.al)"
sub month_string ($$)
{
    my ($self, $mode) = @_;
    return $MonthString{uc($mode)}[$self->month];
}

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