From: Tom Lane <tgl@sss.pgh.pa.us>
Date: Thu, 6 Oct 2005 23:05:22 +0000 (+0000)
Subject: Minor dbf2pg fixes from Martin Pitt: check for failure when issuing
X-Git-Tag: REL8_1_0BETA3~34
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=dd0fa0f958afb32e4e24f25607e3e96734c33f07;p=thirdparty%2Fpostgresql.git

Minor dbf2pg fixes from Martin Pitt: check for failure when issuing
CREATE TABLE command, and translate dBase's 'M' field type to 'text'.
---

diff --git a/contrib/dbase/dbf2pg.c b/contrib/dbase/dbf2pg.c
index 8acb65c557a..c3e50dc4ac2 100644
--- a/contrib/dbase/dbf2pg.c
+++ b/contrib/dbase/dbf2pg.c
@@ -301,6 +301,9 @@ do_create(PGconn *conn, char *table, dbhead * dbh)
 			case 'L':
 				strcat(query, " char");
 				break;
+			case 'M':
+				strcat(query, " text");
+				break;
 		}
 	}
 
@@ -312,7 +315,8 @@ do_create(PGconn *conn, char *table, dbhead * dbh)
 		printf("%s\n", query);
 	}
 
-	if ((res = PQexec(conn, query)) == NULL)
+	if ((res = PQexec(conn, query)) == NULL ||
+		PQresultStatus(res) != PGRES_COMMAND_OK)
 	{
 		fprintf(stderr, "Error creating table!\n");
 		fprintf(stderr, "Detailed report: %s\n", PQerrorMessage(conn));