From 9f1f42b79422953722c44a87d6097c9aedaed9a1 Mon Sep 17 00:00:00 2001
From: dg <dg@51575b47-30f0-44d4-a5cc-537603b46e54>
Date: Tue, 26 Jun 2012 22:40:25 +0000
Subject: [PATCH] better

git-svn-id: http://svn.net-core.org/repos/t-engine4@5299 51575b47-30f0-44d4-a5cc-537603b46e54
---
 game/modules/tome/dialogs/Birther.lua | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/game/modules/tome/dialogs/Birther.lua b/game/modules/tome/dialogs/Birther.lua
index e0fb134466..be1de32f95 100644
--- a/game/modules/tome/dialogs/Birther.lua
+++ b/game/modules/tome/dialogs/Birther.lua
@@ -32,6 +32,7 @@ local TextzoneList = require "engine.ui.TextzoneList"
 local Separator = require "engine.ui.Separator"
 local NameGenerator = require "engine.NameGenerator"
 local NameGenerator2 = require "engine.NameGenerator2"
+local Savefile = require "engine.Savefile"
 local Module = require "engine.Module"
 local Tiles = require "engine.Tiles"
 local Particles = require "engine.Particles"
@@ -257,6 +258,11 @@ function _M:atEnd(v)
 				self.actor.moddable_tile = nil
 			end
 			game:setPlayerName(self.c_name.text)
+
+			local save = Savefile.new(game.save_name)
+			save:delete()
+			save:close()
+
 			game:saveSettings("tome.default_birth", ("tome.default_birth = {permadeath = %q}\n"):format(self.actor.descriptor.permadeath))
 
 			self.at_end(false)
-- 
GitLab