servers/soapbox.lua

Thu, 12 Aug 2010 09:08:55 +0100

author
Matthew Wild <mwild1@gmail.com>
date
Thu, 12 Aug 2010 09:08:55 +0100
changeset 7
015150645930
permissions
-rw-r--r--

Add definition for Coversant Soapbox

7
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
1 local invalid_xml_pattern = [=[<stream:error [^>]+><invalid%-xml [^>]+/><text [^>]+>Invalid XML Received</text>]=];
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
2
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
3 function testers.soapbox()
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
4 if test(q_invalid_xml, invalid_xml_pattern) then
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
5 server_name = "Coversant Soapbox";
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
6 end
015150645930 Add definition for Coversant Soapbox
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
7 end

mercurial