1
0
mirror of https://github.com/postgres/postgres.git synced 2025-08-18 12:22:09 +03:00

OOPS ... Perl5 interface to PQsetdbLogin was actually

calling PQsetdb ...
This commit is contained in:
Tom Lane
1999-02-19 23:27:17 +00:00
parent 4c31393135
commit 3eb22085b5

View File

@@ -1,6 +1,6 @@
/*------------------------------------------------------- /*-------------------------------------------------------
* *
* $Id: Pg.xs,v 1.11 1999/02/11 23:25:16 tgl Exp $ * $Id: Pg.xs,v 1.12 1999/02/19 23:27:17 tgl Exp $
* *
* Copyright (c) 1997, 1998 Edmund Mergl * Copyright (c) 1997, 1998 Edmund Mergl
* *
@@ -752,7 +752,8 @@ setdbLogin(pghost, pgport, pgoptions, pgtty, dbname, login, pwd)
char * login char * login
char * pwd char * pwd
CODE: CODE:
RETVAL = PQsetdb(pghost, pgport, pgoptions, pgtty, dbname); RETVAL = PQsetdbLogin(pghost, pgport, pgoptions, pgtty, dbname,
login, pwd);
OUTPUT: OUTPUT:
RETVAL RETVAL