Const.pm (Class-Date-1.1.16) | : | Const.pm (Class-Date-1.1.17) | ||
---|---|---|---|---|
package Class::Date::Const; | package Class::Date::Const; | |||
our $AUTHORITY = 'cpan:YANICK'; | our $AUTHORITY = 'cpan:YANICK'; | |||
$Class::Date::Const::VERSION = '1.1.17'; | ||||
use strict; | use strict; | |||
use vars qw(@EXPORT @ISA @ERROR_MESSAGES %EXPORT_TAGS); | use vars qw(@EXPORT @ISA @ERROR_MESSAGES %EXPORT_TAGS); | |||
use Exporter; | use Exporter; | |||
our $VERSION = '1.1.15'; | ||||
my %FIELDS = ( | my %FIELDS = ( | |||
# Class::Date fields | # Class::Date fields | |||
c_year => 0, | c_year => 0, | |||
c_mon => 1, | c_mon => 1, | |||
c_day => 2, | c_day => 2, | |||
c_hour => 3, | c_hour => 3, | |||
c_min => 4, | c_min => 4, | |||
c_sec => 5, | c_sec => 5, | |||
c_wday => 6, | c_wday => 6, | |||
c_yday => 7, | c_yday => 7, | |||
skipping to change at line 72 | skipping to change at line 71 | |||
=pod | =pod | |||
=encoding UTF-8 | =encoding UTF-8 | |||
=head1 NAME | =head1 NAME | |||
Class::Date::Const | Class::Date::Const | |||
=head1 VERSION | =head1 VERSION | |||
version 1.1.16 | version 1.1.17 | |||
=head1 AUTHORS | =head1 AUTHORS | |||
=over 4 | =over 4 | |||
=item * | =item * | |||
dLux (Szabó, Balázs) <dlux@dlux.hu> | dLux (Szabó, Balázs) <dlux@dlux.hu> | |||
=item * | =item * | |||
End of changes. 3 change blocks. | ||||
3 lines changed or deleted | 2 lines changed or added |