Bug#1018179: buster-pu: package librose-db-object-perl/1:0.815-1+deb10u1

Adrian Bunk bunk at debian.org
Fri Aug 26 17:20:37 BST 2022


Package: release.debian.org
Severity: normal
Tags: buster
User: release.debian.org at packages.debian.org
Usertags: pu
X-Debbugs-Cc: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>

  * Add upstream fix for test failure after 6/6/2020. (Closes: #962482)
-------------- next part --------------
diff -Nru librose-db-object-perl-0.815/debian/changelog librose-db-object-perl-0.815/debian/changelog
--- librose-db-object-perl-0.815/debian/changelog	2015-10-28 00:32:38.000000000 +0200
+++ librose-db-object-perl-0.815/debian/changelog	2022-08-26 19:06:16.000000000 +0300
@@ -1,3 +1,10 @@
+librose-db-object-perl (1:0.815-1+deb10u1) buster; urgency=medium
+
+  * Non-maintainer upload.
+  * Add upstream fix for test failure after 6/6/2020. (Closes: #962482)
+
+ -- Adrian Bunk <bunk at debian.org>  Fri, 26 Aug 2022 19:06:16 +0300
+
 librose-db-object-perl (1:0.815-1) unstable; urgency=medium
 
   [ Salvatore Bonaccorso ]
diff -Nru librose-db-object-perl-0.815/debian/patches/0001-Fixed-tests-that-were-failing-due-to-future-dates-th.patch librose-db-object-perl-0.815/debian/patches/0001-Fixed-tests-that-were-failing-due-to-future-dates-th.patch
--- librose-db-object-perl-0.815/debian/patches/0001-Fixed-tests-that-were-failing-due-to-future-dates-th.patch	1970-01-01 02:00:00.000000000 +0200
+++ librose-db-object-perl-0.815/debian/patches/0001-Fixed-tests-that-were-failing-due-to-future-dates-th.patch	2022-08-26 19:06:16.000000000 +0300
@@ -0,0 +1,237 @@
+From f349d74149d1c493d8fd6e385526cea8a02ba127 Mon Sep 17 00:00:00 2001
+From: John Siracusa <siracusa at gmail.com>
+Date: Mon, 8 Jun 2020 12:47:32 -0400
+Subject: Fixed tests that were failing due to "future" dates that are now in
+ the past (RT 132782)
+
+--- a/t/db-object-manager.t
++++ b/t/db-object-manager.t
+@@ -635,7 +635,7 @@ SKIP: foreach my $db_type (qw(pg)) #pg_with_schema
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -688,7 +688,7 @@ SKIP: foreach my $db_type (qw(pg)) #pg_with_schema
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -734,7 +734,7 @@ SKIP: foreach my $db_type (qw(pg)) #pg_with_schema
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -795,7 +795,7 @@ SKIP: foreach my $db_type (qw(pg)) #pg_with_schema
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -1342,7 +1342,7 @@ SKIP: foreach my $db_type (qw(pg)) #pg_with_schema
+         save_col   => [ 1, 5 ],
+         nums       => [ 1, 2, 3 ],
+         fk1        => 2,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '3/30/2004 12:34:56 pm'
+       ],
+       clauses => [ "LOWER(status) LIKE 'ac%'" ],
+@@ -3780,7 +3780,7 @@ SKIP: foreach my $db_type ('mysql')
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -3841,7 +3841,7 @@ SKIP: foreach my $db_type ('mysql')
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       hints   => { ignore_index => 'rose_db_object_test_idx' },
+@@ -4371,7 +4371,7 @@ SKIP: foreach my $db_type ('mysql')
+         save_col   => [ 1, 5 ],
+         nums       => [ 1, 2, 3 ],
+         fk1        => 2,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '3/30/2004 12:34:56 pm'
+       ],
+       clauses => [ "LOWER(status) LIKE 'ac%'" ],
+@@ -6583,7 +6583,7 @@ SKIP: foreach my $db_type (qw(informix))
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -6638,7 +6638,7 @@ SKIP: foreach my $db_type (qw(informix))
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -7192,12 +7192,12 @@ SKIP: foreach my $db_type (qw(informix))
+         fk1        => { lt => 100 },
+         or         => [ nums => { in_set => [ 2, 22, 222 ] }, 
+                         fk1 => { lt => 777 },
+-                        last_modified => '6/6/2020' ],
++                        last_modified => '6/6/2099' ], # XXX: Breaks in 2099!
+         nums       => { any_in_set => [ 1, 99, 100 ] },
+         nums       => { in_set => [ 2, 22, 222 ] },
+         nums       => { in_set => 2 },
+         nums       => { all_in_set => [ 1, 2, 3 ] },
+-        last_modified => { le => '6/6/2020' }, # XXX: test breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: test breaks in 2099!
+         date_created  => '3/30/2004 12:34:56 pm'
+       ],
+       clauses => [ "LOWER(status) LIKE 'ac%'" ],
+@@ -9517,7 +9517,7 @@ SKIP: foreach my $db_type (qw(sqlite))
+         save_col   => [ 1, 5, 123 ],
+         #nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -9579,7 +9579,7 @@ SKIP: foreach my $db_type (qw(sqlite))
+         save_col   => [ 1, 5, 123 ],
+         nums       => [ 4, 5, 6 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -10102,7 +10102,7 @@ SKIP: foreach my $db_type (qw(sqlite))
+         save_col   => [ 1, 5 ],
+         nums       => [ 1, 2, 3 ],
+         fk1        => 2,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '3/30/2004 12:34:56 pm'
+       ],
+       clauses => [ "LOWER(status) LIKE 'ac%'" ],
+@@ -12295,7 +12295,7 @@ SKIP: foreach my $db_type (qw(oracle))
+         and        => [],
+         save_col   => [ 1, 5, 123 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -12346,7 +12346,7 @@ SKIP: foreach my $db_type (qw(oracle))
+         and        => [],
+         save_col   => [ 1, 5, 123 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -12397,7 +12397,7 @@ SKIP: foreach my $db_type (qw(oracle))
+         and        => [],
+         save_col   => [ 1, 5, 123 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -12453,7 +12453,7 @@ SKIP: foreach my $db_type (qw(oracle))
+ 
+         save_col   => [ 1, 5, 123 ],
+         fk1        => 1,
+-        last_modified => { le => '6/6/2020' }, # XXX: breaks in 2020!
++        last_modified => { le => '6/6/2099' }, # XXX: breaks in 2099!
+         date_created  => '5/10/2002 10:34:56 am'
+       ],
+       clauses => [ "LOWER(status) LIKE 'w%'" ],
+@@ -12999,8 +12999,8 @@ SKIP: foreach my $db_type (qw(oracle))
+         fk1        => { lt => 99 },
+         fk1        => { lt => 100 },
+         or         => [ fk1 => { lt => 777 },
+-                        last_modified => '6/6/2020' ],
+-        last_modified => { le => '6/6/2020' }, # XXX: test breaks in 2020!
++                        last_modified => '6/6/2099' ], # XXX: Breaks in 2099!
++        last_modified => { le => '6/6/2099' }, # XXX: test breaks in 2099!
+         date_created  => '3/30/2004 12:34:56 pm'
+       ],
+       clauses => [ "LOWER(status) LIKE 'ac%'" ],
+--- a/t/spot-check-04.t
++++ b/t/spot-check-04.t
+@@ -143,7 +143,7 @@ EOF
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (1, 'id1', 'album1', 'artist1', 1999)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (2, 'id2', 'album2', 'artist1', 2000)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (3, 'id3', 'album3', 'artist2', 1934)));
+-    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2020)));
++    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2099)));
+ 
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album1.jpg', 'id1')));
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album2.jpg', 'id2')));
+@@ -170,7 +170,7 @@ EOF
+     $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_albums VALUES (1, 'id1', 'album1', 'artist1', 1999)));
+     $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_albums VALUES (2, 'id2', 'album2', 'artist1', 2000)));
+     $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_albums VALUES (3, 'id3', 'album3', 'artist2', 1934)));
+-    $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2020)));
++    $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2099)));
+ 
+     $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_album_artwork VALUES ('album1.jpg', 'id1')));
+     $dbh->do(qq(INSERT INTO Rose_db_object_private.rdbo_album_artwork VALUES ('album2.jpg', 'id2')));
+@@ -244,7 +244,7 @@ EOF
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (1, 'id1', 'album1', 'artist1', 1999)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (2, 'id2', 'album2', 'artist1', 2000)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (3, 'id3', 'album3', 'artist2', 1934)));
+-    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2020)));
++    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2099)));
+ 
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album1.jpg', 'id1')));
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album2.jpg', 'id2')));
+@@ -296,7 +296,7 @@ EOF
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (1, 'id1', 'album1', 'artist1', 1999)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (2, 'id2', 'album2', 'artist1', 2000)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (3, 'id3', 'album3', 'artist2', 1934)));
+-    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2020)));
++    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2099)));
+ 
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album1.jpg', 'id1')));
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album2.jpg', 'id2')));
+@@ -348,7 +348,7 @@ EOF
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (1, 'id1', 'album1', 'artist1', 1999)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (2, 'id2', 'album2', 'artist1', 2000)));
+     $dbh->do(qq(INSERT INTO rdbo_albums VALUES (3, 'id3', 'album3', 'artist2', 1934)));
+-    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2020)));
++    $dbh->do(qq(INSERT INTO rdbo_albums VALUES (4, 'id4', 'album4', 'artist2', 2099)));
+ 
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album1.jpg', 'id1')));
+     $dbh->do(qq(INSERT INTO rdbo_album_artwork VALUES ('album2.jpg', 'id2')));
+-- 
+2.20.1
+
diff -Nru librose-db-object-perl-0.815/debian/patches/series librose-db-object-perl-0.815/debian/patches/series
--- librose-db-object-perl-0.815/debian/patches/series	1970-01-01 02:00:00.000000000 +0200
+++ librose-db-object-perl-0.815/debian/patches/series	2022-08-26 19:06:15.000000000 +0300
@@ -0,0 +1 @@
+0001-Fixed-tests-that-were-failing-due-to-future-dates-th.patch


More information about the pkg-perl-maintainers mailing list