Ghouls correctly get their speed penality

git-svn-id: http://svn.net-core.org/repos/t-engine4@4354 51575b47-30f0-44d4-a5cc-537603b46e54

game/modules/tome/class/Actor.lua

@@ -2928,6 +2928,7 @@ end
 function _M:addedToLevel(level, x, y)
 	if not self._rst_full then self:resetToFull() self._rst_full = true end -- Only do it once, the first time we come into being
 	self:updateModdableTile()
+	self:recomputeGlobalSpeed()
 	if self.make_escort then
 		for _, filter in ipairs(self.make_escort) do
 			for i = 1, filter.number do

game/modules/tome/class/Game.lua

@@ -231,6 +231,8 @@ function _M:newGame()
 
 		if config.settings.cheat then self.player.__cheated = true end
 
+		self.player:recomputeGlobalSpeed()
+
 		-- Register the character online if possible
 		self.player:getUUID()
 		self:updateCurrentChar()