bugfix: inconsequent tuple usage

This commit is contained in:
Andreas Rumpf
2009-12-09 00:41:55 +01:00
committed by ringabout
parent 7c01f52e92
commit 1c2b176d62

View File

@@ -164,7 +164,7 @@ proc dbClose*(db: TDbConn) =
if db != nil: PQfinish(db)
proc dbOpen*(connection, user, password, database: string): TDbConn =
## opens a database connection. Returns nil in case of an error.
## opens a database connection.
result = PQsetdbLogin(nil, nil, nil, nil, database, user, password)
if PQStatus(result) != CONNECTION_OK: dbError(result) # result = nil