util/stanza.lua
branch0.11
changeset 11265 be38ae8fdfa5
parent 11209 9d1e21c23784
child 11268 2cdcf55c6dd5
child 12801 be09ac8300a7
equal deleted inserted replaced
11241:49aeae836ad1 11265:be38ae8fdfa5
    64 end
    64 end
    65 
    65 
    66 local function check_text(text, text_type)
    66 local function check_text(text, text_type)
    67 	if type(text) ~= "string" then
    67 	if type(text) ~= "string" then
    68 		error("invalid "..text_type.." value: expected string, got "..type(text));
    68 		error("invalid "..text_type.." value: expected string, got "..type(text));
    69 	elseif not valid_xml_cdata(text) then
    69 	elseif not valid_xml_cdata(text, false) then
    70 		error("invalid "..text_type.." value: contains control characters");
    70 		error("invalid "..text_type.." value: contains control characters");
    71 	elseif not valid_utf8(text, false) then
    71 	elseif not valid_utf8(text) then
    72 		error("invalid "..text_type.." value: contains invalid utf8");
    72 		error("invalid "..text_type.." value: contains invalid utf8");
    73 	end
    73 	end
    74 end
    74 end
    75 
    75 
    76 local function check_attr(attr)
    76 local function check_attr(attr)