--- a/util/datamanager.lua	Fri Dec 11 20:24:36 2015 +0100
+++ b/util/datamanager.lua	Fri Dec 11 20:26:04 2015 +0100
@@ -232,9 +232,9 @@
 		f:seek("set", pos);
 	end
 
-	if ok then
-		f:write(data);
-	else
+	ok, msg = f:write(data);
+	if not ok then
+		f:close();
 		return ok, msg;
 	end