From c050ff847539caa3c227ae5f703a3ca178b9979e Mon Sep 17 00:00:00 2001
From: Pixel <pixel@nobis-crew.org>
Date: Wed, 23 Dec 2009 18:38:08 +0100
Subject: Trying to be a little bit nicer with the ressources.

---
 dalos.lua | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'dalos.lua')

diff --git a/dalos.lua b/dalos.lua
index cfe96c0..d1c4008 100644
--- a/dalos.lua
+++ b/dalos.lua
@@ -531,6 +531,7 @@ dalosp.menu = {
         local s, v = pcall(Input, dlg.value)
         if not s then error("Problem loading file " .. dlg.value) end
         local f = preload(v)
+        v:destroy()
         if not f then error("Syntax error loading file " .. dlg.value) end
         local data = f()
         local tlup = dalos.objectstypes_by_name
@@ -610,6 +611,7 @@ dalosp.menu = {
                 v:write "if dalos.version.MAJOR < version.MAJOR or dalos.version.MAJOR == version.MAJOR and dalos.version.MINOR < version.MINOR then error 'Dalos version too old for this save.' end\n\nlocal "
                 dumpvars(v, save, "save")
                 v:write "return save"
+                v:destroy()
             else
                 error("Failed opening " .. dlg.value .. " for writing")
             end
@@ -661,6 +663,7 @@ dalosp.menu = {
         local s, v = pcall(Input, dlg.value)
         if not s then error("Problem loading file " .. dlg.value) end
         local f = preload(v)
+        v:destroy()
         if not f then error("Syntax error loading file " .. dlg.value) end
         local data, otype, tname = f()
         
@@ -911,6 +914,7 @@ dalosp.object = {
             v:write "if dalos.version.MAJOR < version.MAJOR or dalos.version.MAJOR == version.MAJOR and dalos.version.MINOR < version.MINOR then error 'Dalos version too old for this save.' end\n\nlocal "
             dumpvars(v, template, "template")
             v:write("return template, '" .. self.ntype .. "', '" .. name .. "'")
+            v:destroy()
         else
             error("Failed opening " .. dlg.value .. " for writing")
         end
-- 
cgit v1.2.3