[rpms/perl-DBD-Pg] rawhide: Fix missing closing double-quote in su -c commands in dbdpg_test_setup.pl

[Jitka Plesnikova <jplesnik@redhat.com>]

A new commit has been pushed.

Repo   : rpms/perl-DBD-Pg
Branch : rawhide
Commit : 64286bd32ff03dbf60e9ce45e326be7470f0f37e
Author : Jitka Plesnikova <jplesnik@redhat.com>
Date   : 2026-08-24T15:37:47+02:00
Stats  : +28/-1 in 2 file(s)
URL    : https://src.fedoraproject.org/rpms/perl-DBD-Pg/c/64286bd32ff03dbf60e9ce45e326be7470f0f37e?branch=rawhide

Log:
Fix missing closing double-quote in su -c commands in dbdpg_test_setup.pl

---
diff --git a/DBD-Pg-3.21.1-Fix-missing-closing-double-quote-in-su-c-commands.patch b/DBD-Pg-3.21.1-Fix-missing-closing-double-quote-in-su-c-commands.patch
new file mode 100644
index 0000000..27d3d94
--- /dev/null
+++ b/DBD-Pg-3.21.1-Fix-missing-closing-double-quote-in-su-c-commands.patch
@@ -0,0 +1,21 @@
+diff -up DBD-Pg-3.21.1/t/dbdpg_test_setup.pl.orig DBD-Pg-3.21.1/t/dbdpg_test_setup.pl
+--- DBD-Pg-3.21.1/t/dbdpg_test_setup.pl.orig	2026-08-24 15:23:07.170729761 +0200
++++ DBD-Pg-3.21.1/t/dbdpg_test_setup.pl	2026-08-24 15:23:56.355007718 +0200
+@@ -429,7 +429,7 @@ version: $version
+                 $su = $testuser;
+                 $founduser++;
+                 $olddir = getcwd;
+-                my $sucom = build_command(q{su TESTUSER -m -c "/bin/sh -c 'INITDB --locale=C -E utf8 -D DATADIR 2>&1'},
++                my $sucom = build_command(q{su TESTUSER -m -c "/bin/sh -c 'INITDB --locale=C -E utf8 -D DATADIR 2>&1'"},
+                                           [$testuser, $initdb, "$testdir/data"], 'backslash_spaces');
+                 chdir $testdir;
+                 $info = '';
+@@ -569,7 +569,7 @@ version: $version
+ 
+             ## Attempt to start up the test server
+             my $COM = $su ?
+-                build_command(q{su TESTUSER -m -c "PGCTL -o '-k TESTDIR' -l LOGFILE -D DATADIR start},
++                build_command(q{su TESTUSER -m -c "PGCTL -o '-k TESTDIR' -l LOGFILE -D DATADIR start"},
+                               [$su, $pg_ctl, $testdir, "$testdir/$logfile", "$testdir/data"], 'backslash_spaces')
+                 : build_command(q{PGCTL -o '-k TESTDIR' -l LOGFILE -D DATADIR start},
+                                 [$pg_ctl, $testdir, "$testdir/$logfile", "$testdir/data"]);

diff --git a/perl-DBD-Pg.spec b/perl-DBD-Pg.spec
index 85667f7..452efa5 100644
--- a/perl-DBD-Pg.spec
+++ b/perl-DBD-Pg.spec
@@ -4,12 +4,14 @@
 Name:           perl-DBD-Pg
 Summary:        A PostgreSQL interface for Perl
 Version:        3.21.1
-Release:        1%{?dist}
+Release:        2%{?dist}
 # Pg.pm, README:    Points to directory which contains GPL-2.0-or-later and Artistic-1.0-Perl
 # other files:      Same as Perl (GPL-1.0-or-later OR Artistic-1.0-Perl)
 License:        GPL-2.0-or-later OR Artistic-1.0-Perl
 Source0:        https://cpan.metacpan.org/authors/id/T/TU/TURNSTEP/DBD-Pg-%{version}.tar.gz 
 URL:            https://metacpan.org/release/DBD-Pg
+# https://github.com/bucardo/dbdpg/pull/205
+Patch0:         DBD-Pg-3.21.1-Fix-missing-closing-double-quote-in-su-c-commands.patch
 
 BuildRequires:  coreutils
 BuildRequires:  findutils
@@ -86,6 +88,7 @@ with "%{_libexecdir}/%{name}/test".
 
 %prep
 %setup -q -n DBD-Pg-%{version}
+%patch -P0 -p1
 
 # Help generators to recognize Perl scripts
 for F in t/*.t t/*.pl; do
@@ -155,6 +158,9 @@ make test
 %{_libexecdir}/%{name}
 
 %changelog
+* Mon Aug 24 2026 Jitka Plesnikova <jplesnik@redhat.com> - 3.21.1-2
+- Fix missing closing double-quote in su -c commands in dbdpg_test_setup.pl
+
 * Mon Aug 24 2026 Jitka Plesnikova <jplesnik@redhat.com> - 3.21.1-1
 - 3.21.1 bump (rhbz#2521506)
 - Fix CVE-2026-78183