X-Git-Url: https://git.enpas.org/?a=blobdiff_plain;f=tools%2Ferlparse.lua;h=37d4bb621dbd403f58793feea4ec79d5f65b7cf0;hb=61fbebe4017d142510fbcfce61714ecb48b99503;hp=c4372243273838cc0743a1ffa51fee8b405391fa;hpb=c653d648a2474e51403de8b7426731fe0a54ee04;p=prosody.git

diff --git a/tools/erlparse.lua b/tools/erlparse.lua
index c4372243..37d4bb62 100644
--- a/tools/erlparse.lua
+++ b/tools/erlparse.lua
@@ -1,3 +1,23 @@
+-- Prosody IM v0.2
+-- Copyright (C) 2008 Matthew Wild
+-- Copyright (C) 2008 Waqas Hussain
+-- 
+-- This program is free software; you can redistribute it and/or
+-- modify it under the terms of the GNU General Public License
+-- as published by the Free Software Foundation; either version 2
+-- of the License, or (at your option) any later version.
+-- 
+-- This program is distributed in the hope that it will be useful,
+-- but WITHOUT ANY WARRANTY; without even the implied warranty of
+-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+-- GNU General Public License for more details.
+-- 
+-- You should have received a copy of the GNU General Public License
+-- along with this program; if not, write to the Free Software
+-- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+--
+
+
 
 local file = nil;
 local last = nil;
@@ -52,7 +72,7 @@ local function readSpecialString()
 	read("<"); read("<"); -- read <<
 	local str = "";
 	if peek() == "\"" then
-		local str = readString();
+		str = readString();
 	elseif peek() ~= ">" then
 		error();
 	end
@@ -98,7 +118,7 @@ readItem = function()
 		return readString();
 	elseif ch == "<" then
 		return readSpecialString();
-	elseif isSpace(ch) or ch == "," then
+	elseif isSpace(ch) or ch == "," or ch == "|" then
 		read();
 		return readItem();
 	else