aboutsummaryrefslogtreecommitdiff
path: root/databases/p5-Pg
diff options
context:
space:
mode:
authorPalle Girgensohn <girgen@FreeBSD.org>2005-02-10 22:59:55 +0000
committerPalle Girgensohn <girgen@FreeBSD.org>2005-02-10 22:59:55 +0000
commit93c9d246c601b2928c20ab469180389862aacdaf (patch)
treeacbddea4b4130b41fee3308297c740c7567e1a24 /databases/p5-Pg
parent38859b751df844fa627b666c3055d2bc0964146f (diff)
downloadports-93c9d246c601b2928c20ab469180389862aacdaf.tar.gz
ports-93c9d246c601b2928c20ab469180389862aacdaf.zip
Fix a problem where an array is returned from a DoQuery call that
should return 0 tuples. It was always returning an array that indicates it has 1 tuple. Submitted by: Birch Zimmer <birch at naturalpoint dot com> Approved by: ade (mentor)
Notes
Notes: svn path=/head/; revision=128489
Diffstat (limited to 'databases/p5-Pg')
-rw-r--r--databases/p5-Pg/Makefile2
-rw-r--r--databases/p5-Pg/files/patch-Pg.pm11
2 files changed, 12 insertions, 1 deletions
diff --git a/databases/p5-Pg/Makefile b/databases/p5-Pg/Makefile
index ccaf0b8821c9..dc4bbeed2bb8 100644
--- a/databases/p5-Pg/Makefile
+++ b/databases/p5-Pg/Makefile
@@ -7,7 +7,7 @@
PORTNAME= Pg
PORTVERSION= 2.1.1
-PORTREVISION= 1
+PORTREVISION= 2
PORTEPOCH= 1
CATEGORIES= databases perl5
MASTER_SITES= ftp://gborg.postgresql.org/pub/pgperl/stable/
diff --git a/databases/p5-Pg/files/patch-Pg.pm b/databases/p5-Pg/files/patch-Pg.pm
new file mode 100644
index 000000000000..0f538d6b3a50
--- /dev/null
+++ b/databases/p5-Pg/files/patch-Pg.pm
@@ -0,0 +1,11 @@
+--- Pg.pm~ Tue Apr 20 05:25:06 2004
++++ Pg.pm Thu Feb 10 00:17:29 2005
+@@ -69,7 +69,7 @@
+
+ my ($result, $status, $i, $j);
+
+- $$array_ref[0][0] = '';
++ @$array_ref = ();
+
+ if ($result = $conn->exec($query)) {
+ if (2 == ($status = $result->resultStatus)) {