# HG changeset patch # User Matthew Wild # Date 1271865824 -3600 # Node ID d9d0f9517ca0be6c965ecde386934871cb1d1f1f # Parent ba1cc6ad649d0370557ec33b1e57ad5a74ca294e servers/ejabberd.lua: Support for detection of ejabberd prior to 1.1.4 diff -r ba1cc6ad649d -r d9d0f9517ca0 servers/ejabberd.lua --- a/servers/ejabberd.lua Thu Feb 18 16:02:11 2010 +0000 +++ b/servers/ejabberd.lua Wed Apr 21 17:03:44 2010 +0100 @@ -16,9 +16,13 @@ local stream_open = [[]]; - if not test(stream_open.."", ":features>$") then -- Oops, not ejabberd - debug("Oops, not ejabberd (please report):", test(stream_open.."", ".*")); - server_name = nil; + if not test(stream_open.."", ":features>$") then + if test(stream_open, literal " from='dummyhost'") then + server_min_version = "1.x.x"; + else + debug("Oops, not ejabberd (please report):", test(stream_open.."", ".*")); + server_name = nil; + end return; end @@ -27,7 +31,7 @@ elseif test(stream_open, literal "