diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/interfaces/perl5/Pg.pm | 4 | ||||
| -rw-r--r-- | src/interfaces/perl5/Pg.xs | 4 |
2 files changed, 2 insertions, 6 deletions
diff --git a/src/interfaces/perl5/Pg.pm b/src/interfaces/perl5/Pg.pm index 66dfd3961ea..920612ebb4e 100644 --- a/src/interfaces/perl5/Pg.pm +++ b/src/interfaces/perl5/Pg.pm @@ -1,6 +1,6 @@ #------------------------------------------------------- # -# $Id: Pg.pm,v 1.9 2001/05/11 01:46:33 momjian Exp $ +# $Id: Pg.pm,v 1.10 2001/09/10 04:19:19 momjian Exp $ # # Copyright (c) 1997, 1998 Edmund Mergl # @@ -93,7 +93,6 @@ require 5.002; PGRES_NONFATAL_ERROR PGRES_FATAL_ERROR PGRES_INV_SMGRMASK - PGRES_INV_ARCHIVE PGRES_INV_WRITE PGRES_INV_READ PGRES_InvalidOid @@ -621,7 +620,6 @@ Creates a new large object. $mode is a bit-mask describing different attributes of the new object. Use the following constants: - PGRES_INV_SMGRMASK - - PGRES_INV_ARCHIVE - PGRES_INV_WRITE - PGRES_INV_READ diff --git a/src/interfaces/perl5/Pg.xs b/src/interfaces/perl5/Pg.xs index fdcec87c79d..76c63cbebea 100644 --- a/src/interfaces/perl5/Pg.xs +++ b/src/interfaces/perl5/Pg.xs @@ -1,6 +1,6 @@ /*------------------------------------------------------- * - * $Id: Pg.xs,v 1.16 2000/12/03 20:45:40 tgl Exp $ with patch for NULs + * $Id: Pg.xs,v 1.17 2001/09/10 04:19:19 momjian Exp $ with patch for NULs * * Copyright (c) 1997, 1998 Edmund Mergl * @@ -71,8 +71,6 @@ int arg; { return 1; if (strEQ(name, "PGRES_INV_SMGRMASK")) return 0x0000ffff; - if (strEQ(name, "PGRES_INV_ARCHIVE")) - return 0x00010000; if (strEQ(name, "PGRES_INV_WRITE")) return 0x00020000; if (strEQ(name, "PGRES_INV_READ")) |