(s_mysql_free): Bugfix: mysql was freed twice

(s_mysql_query): Fix the first argument to scm_list_2

1 files changed, 1 insertions, 2 deletions

diff --git a/src/mysql.c b/src/mysql.c
index 7abbf2e..d788a92 100644
--- a/src/mysql.c
+++ b/src/mysql.c
@@ -35,7 +35,6 @@ s_mysql_free(struct sql_connect *conn)
         if (!mysql)
                 return 0;
         mysql_close(mysql);
-        free(mysql);
         return sizeof(MYSQL);
 }
 
@@ -131,7 +130,7 @@ s_mysql_query(struct sql_connect *conn, char *query)
                         cell = scm_makenum(mysql_affected_rows(mysql));
                 } else { /* mysql_store_result() should have returned data */
                         scm_throw(gsql_error,
-                                  scm_list_2("Query should have returned data",
+                                  scm_list_2(scm_makfrom0str("Query should have returned data"),
                                              scm_makfrom0str(mysql_error(mysql))));
                 }
         }