rpms/perl-DBD-Pg
7
0
Fork 0
Code Issues Pull Requests Releases Activity

Fix patch for fuzz.

Browse Source
This commit is contained in:
Marcela Mašláňová 2008-07-28 07:02:54 +00:00
parent ad9a5d9b1c
commit dbf898a957
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
perl-DBD-1.31-fixver.patch
View File

@ -1,12 +1,13 @@
--- DBD-Pg-1.31/t/lib/App/Info/RDBMS/PostgreSQL.pm.fixver 2003-12-19 09:48:23.000000000 -0500
+++ DBD-Pg-1.31/t/lib/App/Info/RDBMS/PostgreSQL.pm 2003-12-19 09:48:47.000000000 -0500
@@ -254,6 +254,9 @@
} elsif ($version =~ /(\d+)\.(\d+)\w+\d+/) {
diff -up DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm.fix DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm
--- DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm.fix 2008-07-21 17:15:05.000000000 +0200
+++ DBD-Pg-2.8.7/t/lib/App/Info/RDBMS/PostgreSQL.pm 2008-07-28 09:01:08.000000000 +0200
@@ -274,6 +274,9 @@ my $get_version = sub {
# New versions, such as "7.4", are treated as patch level "0"
@{$self}{qw(version major minor patch)} =
($version, $1, $2, 0);
+ } elsif ($version =~ /(\d+)\.(\d+)/) {
+ @{$self}{qw(version major minor patch)} =
+ ($version, $1, $2, 0);
+ ($version, $1, $2, 0);
} else {
$self->error("Failed to parse PostgreSQL version parts from " .
"string '$version'");

2
perl-DBD-Pg.spec
View File

@ -22,7 +22,7 @@ An implementation of DBI for PostgreSQL for Perl.
%prep
%setup -q -n DBD-Pg-%{version}
%patch0 -p1
#%patch0 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor OPTIMIZE="$RPM_OPT_FLAGS"