Fix naming the lost merchant artifact when using #

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

@@ -159,7 +159,7 @@ end
 
 --- Sets the player name
 function _M:setPlayerName(name)
-	name = name:removeColorCodes():gsub("#", " ")
+	name = name:removeColorCodes():gsub("#", " "):sub(1, 25)
 	self.save_name = name
 	self.player_name = name
 	if self.party and self.party:findMember{main=true} then