diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/interfaces/perl5/Pg.xs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/interfaces/perl5/Pg.xs b/src/interfaces/perl5/Pg.xs index 9d5d264782b..5419130a528 100644 --- a/src/interfaces/perl5/Pg.xs +++ b/src/interfaces/perl5/Pg.xs @@ -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 * @@ -752,7 +752,8 @@ setdbLogin(pghost, pgport, pgoptions, pgtty, dbname, login, pwd) char * login char * pwd CODE: - RETVAL = PQsetdb(pghost, pgport, pgoptions, pgtty, dbname); + RETVAL = PQsetdbLogin(pghost, pgport, pgoptions, pgtty, dbname, + login, pwd); OUTPUT: RETVAL |