From 14874a9776f1ac6ed64450ab91a0ede42fc3b276 Mon Sep 17 00:00:00 2001
From: Ryan Flynn <Ryan.Flynn@teamaol.com>
Date: Wed, 2 Jan 2013 15:54:51 -0500
Subject: [PATCH] make write_many nestable via SAVEPOINT instead of
 BEGIN/COMMIT

---
 src/sqlite3.erl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/sqlite3.erl b/src/sqlite3.erl
index 3e3d4b3..82d39d6 100644
--- a/src/sqlite3.erl
+++ b/src/sqlite3.erl
@@ -828,9 +828,9 @@ handle_call({write, Tbl, Data}, _From, State) ->
             {reply, {error, Exception}, State}
     end;
 handle_call({write_many, Tbl, DataList}, _From, State) ->
-    SQLScript = ["BEGIN;", 
+    SQLScript = ["SAVEPOINT 'erlang-sqlite3-write_many';", 
                  [sqlite3_lib:write_sql(Tbl, Data) || Data <- DataList], 
-                 "COMMIT;"],
+                 "RELEASE SAVEPOINT 'erlang-sqlite3-write_many';"],
     Reply = do_sql_exec_script(SQLScript, State),
     {reply, Reply, State};
 handle_call({read, Tbl}, _From, State) ->