From fe529891d2b257d504d4cb77786bca801afb8e82 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Michal=20Josef=20=C5=A0pa=C4=8Dek?= <mspacek@redhat.com>
Date: Tue, 28 Jul 2026 16:42:36 +0200
Subject: [PATCH] Fix patch

Resolves: RHEL-193298
---
 perl-DBI.spec | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/perl-DBI.spec b/perl-DBI.spec
index 4ea301c..8447609 100644
--- a/perl-DBI.spec
+++ b/perl-DBI.spec
@@ -34,7 +34,7 @@
 
 Name:           perl-DBI
 Version:        1.641
-Release:        6%{?dist}
+Release:        7%{?dist}
 Summary:        A database access API for perl
 License:        GPL+ or Artistic
 URL:            http://dbi.perl.org/
@@ -159,6 +159,7 @@ the use of existing DBI frameworks like DBIx::Class.
 %prep
 %setup -q -n DBI-%{version} 
 %patch -P0 -p1
+%patch -P1 -p1
 for F in lib/DBD/Gofer.pm; do
     iconv -f ISO-8859-1 -t UTF-8 < "$F" > "${F}.utf8"
     touch -r "$F" "${F}.utf8"
@@ -222,6 +223,9 @@ make test
 %endif
 
 %changelog
+* Tue Jul 28 2026 Michal Josef Špaček <mspacek@redhat.com> - 1.641-7
+- Fix patch.
+
 * Tue Jul 28 2026 Michal Josef Špaček <mspacek@redhat.com> - 1.641-6
 - Fix heap overflow when preparsing SQL statements with excessive placeholders (CVE-2026-14739)
   Resolves: RHEL-193298