1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
Description: Create table with OIDs in test
The test verifies the presence of an OID, but they are not created by default
any more.
Author: Martin Pitt <mpitt@debian.org>
Forwarded: no
Last-Update: 2014-07-29
--- libpg-perl-2.1.1.orig/test.pl
+++ libpg-perl-2.1.1/test.pl
@@ -148,7 +148,7 @@ my $port = $conn->port;
######################### create and insert into table
# we test comments inside string and with no trailing newline here
-$result = $conn->exec("CREATE TABLE person (id int4, -- test\n name char(16)) -- test");
+$result = $conn->exec("CREATE TABLE person (id int4, -- test\n name char(16)) WITH OIDS -- test");
die $conn->errorMessage unless PGRES_COMMAND_OK eq $result->resultStatus;
my $cmd = $result->cmdStatus;
( $cmd =~ /^CREATE/ )
|
