[rpms/perl-DBD-CSV] rawhide: Update to 0.63 (rhbz#2491316)

[Paul Howarth <paul@city-fan.org>]

            A new commit has been pushed.

            Repo   : rpms/perl-DBD-CSV
            Branch : rawhide
            Commit : 838bff89f3503fcb7b14c76008084b6b7f5b9169
            Author : Paul Howarth <paul@city-fan.org>
            Date   : 2026-06-22T14:27:58+01:00
            Stats  : +15/-84 in 3 file(s)
            URL    : https://src.fedoraproject.org/rpms/perl-DBD-CSV/c/838bff89f3503fcb7b14c76008084b6b7f5b9169?branch=rawhide

            Log:
            Update to 0.63 (rhbz#2491316)

- New upstream release 0.63
  - It's 2026
  - New test for DBI-1.648 CVE fix
  - Minor typo in doc
  - Raise recommended versions for fixed CVE's

---
diff --git a/DBD-CSV-0.62-dbi-1.648.patch b/DBD-CSV-0.62-dbi-1.648.patch
deleted file mode 100644
index 59bf9c0..0000000
--- a/DBD-CSV-0.62-dbi-1.648.patch
+++ /dev/null
@@ -1,71 +0,0 @@
-From ae091790398088a66b22fa572856bfeb4db4c78a Mon Sep 17 00:00:00 2001
-From: "H.Merijn Brand - Tux" <linux@tux.freedom.nl>
-Date: Thu, 28 May 2026 10:06:33 +0200
-Subject: [PATCH] New test for DBI-1.648 CVE fix
-
----
- t/70_csv.t | 24 +++++++++++++++++++++++-
- t/lib.pl   |  3 +--
- 2 files changed, 26 insertions(+), 4 deletions(-)
-
-diff --git a/t/70_csv.t b/t/70_csv.t
-index 30d2d59..a65385a 100644
---- a/t/70_csv.t
-+++ b/t/70_csv.t
-@@ -3,6 +3,7 @@
- use strict;
- use warnings;
- use Test::More;
-+use File::Spec;
- 
- BEGIN { use_ok ("DBI"); }
- do "./t/lib.pl";
-@@ -85,12 +86,33 @@ ok ($dbh = Connect ($dsn),			"connect");
- # Check, whether the csv_tables->{$tbl}{file} attribute works
- like (my $def4 = TableDefinition ($tbl4, @tbl_def),
- 	qr{^create table $tbl4}i,		"table definition");
--ok ($dbh->{csv_tables}{$tbl4}{file} = DbFile ($tbl4), "set table/file");
-+{   my $dbf4 = DbFile ($tbl4);
-+    my $dbd4 = DbDir ();
-+
-+    $dbh->{f_dir_search} = [ $dbd4 ];
-+    ok ($dbh->{csv_tables}{$tbl4}{file} = $dbf4, "set table/file");
-+    }
- ok ($dbh->do ($def4),				"create table");
- ok (-f DbFile ($tbl4),				"does exists");
- 
- ok ($dbh->do ("drop table $tbl4"),		"drop table");
- 
-+if ($DBI::VERSION ge "1.648") {
-+    ok (my $tbl5 = FindNewTable ($dbh),			"find new test table");
-+    my $dir5 = File::Spec->catdir (DbDir (), "not-in-scope");
-+    mkdir $dir5;
-+    ok (my $dbf5 = File::Spec->catdir ($dir5, $tbl5),	"in bad location");
-+    ok (!-f $dbf5,					"does not exist");
-+    ok ($dbh->{csv_tables}{$tbl5}{file} = $dbf5,	"set to illegal location");
-+    {   my @d;
-+	local $SIG{__DIE__}  = sub { push @d => @_ };
-+	local $dbh->{PrintError} = 0;
-+	eval { $dbh->do ("create table $tbl5 (x char)"); };
-+	like ("@d", qr{is unsafe and not allowed},	"unsafe caught");
-+	};
-+    rmdir $dir5;
-+    }
-+
- ok ($dbh->disconnect,				"disconnect");
- undef $dbh;
- 
-diff --git a/t/lib.pl b/t/lib.pl
-index 9050d91..74e3f0f 100644
---- a/t/lib.pl
-+++ b/t/lib.pl
-@@ -116,8 +116,7 @@ sub DbCleanup {
- 
-     my $testtable = "testaa";
- 
--    sub FindNewTable
--    {
-+    sub FindNewTable {
- 	my $dbh = shift;
- 
- 	my @tables = defined $listTablesHook ? $listTablesHook->($dbh)

diff --git a/perl-DBD-CSV.spec b/perl-DBD-CSV.spec
index 23618b0..d8d6d98 100644
--- a/perl-DBD-CSV.spec
+++ b/perl-DBD-CSV.spec
@@ -1,11 +1,10 @@
 Name:           perl-DBD-CSV
-Version:        0.62
-Release:        5%{?dist}
+Version:        0.63
+Release:        1%{?dist}
 Summary:        DBI driver for CSV files
 License:        GPL-1.0-or-later OR Artistic-1.0-Perl
 URL:            https://metacpan.org/release/DBD-CSV
 Source0:        https://cpan.metacpan.org/modules/by-module/DBD/DBD-CSV-%{version}.tgz
-Patch0:         DBD-CSV-0.62-dbi-1.648.patch
 BuildArch:      noarch
 # Module Build
 BuildRequires:  coreutils
@@ -18,26 +17,26 @@ BuildRequires:  perl(lib)
 # Module Runtime
 # The DBI and SQL::Statement are needed per DBD::CVS POD
 BuildRequires:  perl(Carp)
-BuildRequires:  perl(DBD::File) >= 0.44
-BuildRequires:  perl(DBI) >= 1.628
+BuildRequires:  perl(DBD::File) >= 0.45
+BuildRequires:  perl(DBI) >= 1.649
 BuildRequires:  perl(DynaLoader)
 BuildRequires:  perl(Exporter)
 BuildRequires:  perl(IO::File)
 BuildRequires:  perl(SQL::Statement) >= 1.405
 BuildRequires:  perl(strict)
-BuildRequires:  perl(Text::CSV_XS) >= 1.45
+BuildRequires:  perl(Text::CSV_XS) >= 1.62
 BuildRequires:  perl(warnings)
 # Test Suite
 BuildRequires:  perl(charnames)
 BuildRequires:  perl(Cwd)
 BuildRequires:  perl(Encode)
-BuildRequires:  perl(Test::More) >= 0.90
+BuildRequires:  perl(Test::More) >= 1.302222
 # Dependencies
 Requires:       perl(DBD::File) >= 0.44
 Requires:       perl(DBI) >= 1.628
 Requires:       perl(Exporter)
 Requires:       perl(SQL::Statement) >= 1.405
-Requires:       perl(Text::CSV_XS) >= 1.45
+Requires:       perl(Text::CSV_XS) >= 1.62
 
 %global __requires_exclude %{?__requires_exclude:__requires_exclude|}^perl\\(DBD::File\\)$
 %global __requires_exclude %__requires_exclude|^perl\\(Text::CSV_XS\\)$
@@ -53,10 +52,6 @@ MS Excel data.
 %prep
 %setup -q -n DBD-CSV-%{version}
 
-# Fix test failure with DBI 1.648 onwards
-# Based on https://github.com/perl5-dbi/DBD-CSV/commit/ae091790398088a66b22fa572856bfeb4db4c78a
-%patch -P0 -p1
-
 chmod -c a-x ChangeLog README lib/DBD/*.pm lib/Bundle/DBD/*.pm
 
 %build
@@ -78,6 +73,13 @@ make test
 %{_mandir}/man3/DBD::CSV.3*
 
 %changelog
+* Mon Jun 22 2026 Paul Howarth <paul@city-fan.org> - 0.63-1
+- Update to 0.63 (rhbz#2491316)
+  - It's 2026
+  - New test for DBI-1.648 CVE fix
+  - Minor typo in doc
+  - Raise recommended versions for fixed CVE's
+
 * Mon Jun  8 2026 Paul Howarth <paul@city-fan.org> - 0.62-5
 - Fix test failure with DBI 1.648 onwards
 

diff --git a/sources b/sources
index 8be1284..b67dcdb 100644
--- a/sources
+++ b/sources
@@ -1 +1 @@
-SHA512 (DBD-CSV-0.62.tgz) = 088b182c502725ea63ed5d7d618560bbdb58ce4dd37e5b536c9ba88b4b5c5ee79f20026512950a009b6d82f0db83a870588af2ab63d46bf9cfa88094133b4239
+SHA512 (DBD-CSV-0.63.tgz) = dd8fd6cfae8930df06de731211fce3b26e95b3781a19016f995ccdd92def5c38f4260f77f8f0f61abd09f6de4eb5cc86b0f02e35ba71efedd9dbd5fe10765094