- The destructor for a connection resource closed the current

   connection if the connection had been closed before (danny)

diff --git a/ext/informix/ifx.ec b/ext/informix/ifx.ec
index 7d501e58001bddb6b5b08d7de57d471fc1eb2422..aa487a8aa8fb395a6f201f8d94956d93ddc348b7 100644 (file)
--- a/ext/informix/ifx.ec
+++ b/ext/informix/ifx.ec
@@ -284,8 +284,10 @@ static void _close_ifx_link(link)
     IFXLS_FETCH();
 
     EXEC SQL SET CONNECTION :link;
-    EXEC SQL close database;
-    EXEC SQL DISCONNECT CURRENT;
+    if (ifx_check() >= 0) {
+      EXEC SQL close database;
+      EXEC SQL DISCONNECT CURRENT;
+    }
     efree(link);
     IFXG(num_links)--;
 }
@@ -299,9 +301,10 @@ EXEC SQL END DECLARE SECTION;
     IFXLS_FETCH();
 
     EXEC SQL SET CONNECTION :link;
-    EXEC SQL close database;
-    EXEC SQL DISCONNECT CURRENT;
-
+    if (ifx_check() >= 0) {
+      EXEC SQL close database;
+      EXEC SQL DISCONNECT CURRENT;
+    }
     free(link);
     IFXG(num_persistent)--;
     IFXG(num_links)--;