File perl-DBD-Pg-fix-tests.patch of Package perl-DBD-Pg.25215

Index: DBD-Pg-3.10.4/t/03dbmethod.t
===================================================================
--- DBD-Pg-3.10.4.orig/t/03dbmethod.t
+++ DBD-Pg-3.10.4/t/03dbmethod.t
@@ -933,11 +933,16 @@ one => [
 
 ## Make some per-version tweaks
 
-## 8.5 changed the way foreign key names are generated
+## Postgres 8.5 changed the way foreign key names are generated
 if ($pgversion >= 80500) {
     $correct_stats->{two}[1][5] = $correct_stats->{two}[2][5] = 'dbd_pg_test2_b_c_key';
 }
 
+## Postgres 13 changed unknown reltuples from 0 to -1
+if ($pgversion >= 140000) {
+    $correct_stats->{one}[0][10] = $correct_stats->{two}[0][10] = $correct_stats->{three}[0][10] = -1;
+}
+
 my $stats;
 
 $t="Correct stats output for $table1";