Hello community,
here is the log from the commit of package perl-DateTime-Calendar-Julian for
openSUSE:Factory checked in at 2019-11-18 19:59:26
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-DateTime-Calendar-Julian (Old)
and /work/SRC/openSUSE:Factory/.perl-DateTime-Calendar-Julian.new.26869
(New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-DateTime-Calendar-Julian"
Mon Nov 18 19:59:26 2019 rev:4 rq:748277 version:0.102
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-DateTime-Calendar-Julian/perl-DateTime-Calendar-Julian.changes
2019-08-19 20:52:43.629029819 +0200
+++
/work/SRC/openSUSE:Factory/.perl-DateTime-Calendar-Julian.new.26869/perl-DateTime-Calendar-Julian.changes
2019-11-18 19:59:43.697914078 +0100
@@ -1,0 +2,18 @@
+Sun Nov 10 10:04:56 UTC 2019 - <timueller+p...@suse.de>
+
+- updated to 0.102
+ see /usr/share/doc/packages/perl-DateTime-Calendar-Julian/Changes
+
+ 0.102 2019-11-09 T. R. Wyant
+ - Add optional separator arg to datetime(). This tracks the same
+ change in DateTime version 1.43 dated 2017-05-29. Thanks to Jean
+ Forget for finding, isolating, and reporting this.
+
+ - NOTE that the above change restores the 'T' separator in
+ stringification, as it was before DateTime 1.43.
+
+ - Add tests for datetime() method.
+
+ - Eliminate redirections in POD URL links
+
+-------------------------------------------------------------------
Old:
----
DateTime-Calendar-Julian-0.101.tar.gz
New:
----
DateTime-Calendar-Julian-0.102.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-DateTime-Calendar-Julian.spec ++++++
--- /var/tmp/diff_new_pack.Ka7YQy/_old 2019-11-18 19:59:44.321913765 +0100
+++ /var/tmp/diff_new_pack.Ka7YQy/_new 2019-11-18 19:59:44.321913765 +0100
@@ -17,7 +17,7 @@
Name: perl-DateTime-Calendar-Julian
-Version: 0.101
+Version: 0.102
Release: 0
%define cpan_name DateTime-Calendar-Julian
Summary: Dates in the Julian calendar
++++++ DateTime-Calendar-Julian-0.101.tar.gz ->
DateTime-Calendar-Julian-0.102.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/Changes
new/DateTime-Calendar-Julian-0.102/Changes
--- old/DateTime-Calendar-Julian-0.101/Changes 2019-08-14 13:11:52.000000000
+0200
+++ new/DateTime-Calendar-Julian-0.102/Changes 2019-11-09 16:38:27.000000000
+0100
@@ -1,3 +1,15 @@
+0.102 2019-11-09 T. R. Wyant
+ - Add optional separator arg to datetime(). This tracks the same
+ change in DateTime version 1.43 dated 2017-05-29. Thanks to Jean
+ Forget for finding, isolating, and reporting this.
+
+ - NOTE that the above change restores the 'T' separator in
+ stringification, as it was before DateTime 1.43.
+
+ - Add tests for datetime() method.
+
+ - Eliminate redirections in POD URL links
+
0.101 2019-08-14 T. R. Wyant
- Fix broken POD links, and add test to ensure they stay fixed.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/META.json
new/DateTime-Calendar-Julian-0.102/META.json
--- old/DateTime-Calendar-Julian-0.101/META.json 2019-08-14
13:12:19.000000000 +0200
+++ new/DateTime-Calendar-Julian-0.102/META.json 2019-11-09
16:38:51.000000000 +0100
@@ -5,7 +5,7 @@
"Thomas R. Wyant, III <wyant at cpan dot org>"
],
"dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 7.36, CPAN::Meta::Converter
version 2.150010",
+ "generated_by" : "ExtUtils::MakeMaker version 7.38, CPAN::Meta::Converter
version 2.150010",
"license" : [
"perl_5"
],
@@ -43,7 +43,7 @@
"provides" : {
"DateTime::Calendar::Julian" : {
"file" : "lib/DateTime/Calendar/Julian.pm",
- "version" : "0.101"
+ "version" : "0.102"
}
},
"release_status" : "stable",
@@ -61,6 +61,6 @@
"web" : "https://github.com/trwyant/perl-DateTime-Calendar-Julian";
}
},
- "version" : "0.101",
+ "version" : "0.102",
"x_serialization_backend" : "JSON::PP version 4.04"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/META.yml
new/DateTime-Calendar-Julian-0.102/META.yml
--- old/DateTime-Calendar-Julian-0.101/META.yml 2019-08-14 13:12:19.000000000
+0200
+++ new/DateTime-Calendar-Julian-0.102/META.yml 2019-11-09 16:38:51.000000000
+0100
@@ -8,7 +8,7 @@
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 7.36, CPAN::Meta::Converter version
2.150010'
+generated_by: 'ExtUtils::MakeMaker version 7.38, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -23,7 +23,7 @@
provides:
DateTime::Calendar::Julian:
file: lib/DateTime/Calendar/Julian.pm
- version: '0.101'
+ version: '0.102'
requires:
DateTime: '0.08'
perl: '5.008004'
@@ -31,5 +31,5 @@
bugtracker:
https://rt.cpan.org/Public/Dist/Display.html?Name=DateTime-Calendar-Julian
license: http://dev.perl.org/licenses/
repository: git://github.com/trwyant/perl-DateTime-Calendar-Julian.git
-version: '0.101'
+version: '0.102'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/DateTime-Calendar-Julian-0.101/lib/DateTime/Calendar/Julian.pm
new/DateTime-Calendar-Julian-0.102/lib/DateTime/Calendar/Julian.pm
--- old/DateTime-Calendar-Julian-0.101/lib/DateTime/Calendar/Julian.pm
2019-08-14 13:11:34.000000000 +0200
+++ new/DateTime-Calendar-Julian-0.102/lib/DateTime/Calendar/Julian.pm
2019-11-09 16:38:27.000000000 +0100
@@ -5,7 +5,7 @@
use vars qw($VERSION @ISA);
-$VERSION = '0.101';
+$VERSION = '0.102';
use DateTime 0.08;
@ISA = 'DateTime';
@@ -90,10 +90,13 @@
return _floor($year/100)-_floor($year/400)-2;
}
+# NOTE: Do NOT just default the separator to 'J' and delegate to SUPER.
+# This will not work before DateTime 1.43 because before that the
+# datetime() method did not have an argument.
sub datetime {
- my $self = shift;
-
- return join 'J', $self->ymd, $self->hms(':');
+ my ( $self, $sep ) = @_;
+ $sep = 'J' unless defined $sep;
+ return join $sep, $self->ymd( '-' ), $self->hms( ':' );
}
1;
@@ -143,9 +146,22 @@
=item * datetime
-This method is now equivalent to:
+ print $dt->datetime( $sep ), "\n";
+
+This method is equivalent to
+
+ join $sep, $dt->ymd( '-' ), $dt->hms( ':' );
+
+The C<$sep> argument defaults to C<'J'>.
- $dt->ymd('-') . 'J' . $dt->hms(:)
+B<Caveat:> the optional argument was added to this method in version
+1.02, to belatedly track a change made in L<DateTime|DateTime> version
+1.43 released 2017-05-29. Fixing this restores the original
+stringification behavior of this class, which was to return an ISO-8601
+string unless a formatter was set. Before this change, the
+stringification separated date and time with either a C<'T'> or a
+C<'J'>, depending on which version of L<DateTime|DateTime> was
+installed.
=back
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/t/1.t
new/DateTime-Calendar-Julian-0.102/t/1.t
--- old/DateTime-Calendar-Julian-0.101/t/1.t 2018-10-20 20:10:50.000000000
+0200
+++ new/DateTime-Calendar-Julian-0.102/t/1.t 2019-10-31 18:20:53.000000000
+0100
@@ -3,9 +3,10 @@
#########################
-BEGIN { $^W = 1 }
+use strict;
+use warnings;
-use Test::More tests => 30;
+use Test::More tests => 42;
BEGIN { use_ok('DateTime::Calendar::Julian') };
#########################
@@ -16,7 +17,7 @@
use DateTime;
-foreach $date (
+foreach my $date (
# Julian date , Gregorian , diff
[ '1582/10/05', '1582/10/15', 10 ], # Jul => Greg reform date
[ '1752/09/03', '1752/09/14', 11 ], # English reform date
@@ -30,7 +31,13 @@
my $d = DateTime::Calendar::Julian->new(year => $y,
month => $m,
day => $day,
+ hour => 0, # for
+ minute => 0, # datetime()
+ second => 0, # test
time_zone => 'floating' );
+ my $str = sprintf( '%04d-%02d-%02d', $y, $m, $day );
+ is( $d->datetime(), "${str}J00:00:00", "datetime() of $date->[0]" );
+ is( "$d", "${str}T00:00:00", "stringification of $date->[0]" );
my $dt = DateTime->from_object( object => $d );
is($dt->ymd('/'), $date->[1], "converting $date->[0] to Gregorian");
$d = DateTime::Calendar::Julian->from_object( object => $dt );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/t/4doy.t
new/DateTime-Calendar-Julian-0.102/t/4doy.t
--- old/DateTime-Calendar-Julian-0.101/t/4doy.t 2018-10-20 20:10:50.000000000
+0200
+++ new/DateTime-Calendar-Julian-0.102/t/4doy.t 2019-10-31 17:04:31.000000000
+0100
@@ -1,5 +1,5 @@
use strict;
-BEGIN { $^W = 1 }
+use warnings;
use Test::More tests => 11;
use DateTime::Calendar::Julian;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/t/5week.t
new/DateTime-Calendar-Julian-0.102/t/5week.t
--- old/DateTime-Calendar-Julian-0.101/t/5week.t 2018-10-20
20:10:50.000000000 +0200
+++ new/DateTime-Calendar-Julian-0.102/t/5week.t 2019-10-31
17:04:47.000000000 +0100
@@ -1,5 +1,5 @@
use strict;
-BEGIN { $^W = 1 }
+use warnings;
use Test::More tests => 8;
use DateTime::Calendar::Julian;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/DateTime-Calendar-Julian-0.101/xt/author/pod_links.t
new/DateTime-Calendar-Julian-0.102/xt/author/pod_links.t
--- old/DateTime-Calendar-Julian-0.101/xt/author/pod_links.t 2019-08-07
16:55:18.000000000 +0200
+++ new/DateTime-Calendar-Julian-0.102/xt/author/pod_links.t 2019-10-23
23:03:42.000000000 +0200
@@ -7,12 +7,23 @@
use Test::More 0.88; # Because of done_testing();
-eval {
- require Test::Pod::LinkCheck::Lite;
- 1;
-} or plan skip_all => 'Unable to load Test::Pod::LinkCheck::Lite';
+BEGIN {
+ local $@ = undef;
+ eval {
+ require Test::Pod::LinkCheck::Lite;
+ Test::Pod::LinkCheck::Lite->import( ':const' );
+ 1;
+ } or plan skip_all => 'Unable to load Test::Pod::LinkCheck::Lite';
+}
-Test::Pod::LinkCheck::Lite->new()->all_pod_files_ok();
+Test::Pod::LinkCheck::Lite->new(
+ prohibit_redirect => sub {
+ my ( undef, undef, $url ) = @_;
+ 'http://datetime.perl.org/' eq $url
+ and return;
+ return ALLOW_REDIRECT_TO_INDEX;
+ },
+)->all_pod_files_ok();
done_testing;
