Mercurial > prosody-hg

comparison tests/test_util_jid.lua @ 3376:529bc6ea24e2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge Zash->trunk
author Matthew Wild <mwild1@gmail.com>
date Fri, 16 Jul 2010 15:10:45 +0100
parents 29e51e1c7c3d
children 6402a9defcdc
comparison
equal deleted inserted replaced
3374:ce52f1d5cb74 3376:529bc6ea24e2
52 assert_equal(bare("user@@host"), nil, "invalid JID is nil"); 52 assert_equal(bare("user@@host"), nil, "invalid JID is nil");
53 assert_equal(bare("user@@host/resource"), nil, "invalid JID is nil"); 53 assert_equal(bare("user@@host/resource"), nil, "invalid JID is nil");
54 assert_equal(bare("user@host/"), nil, "invalid JID is nil"); 54 assert_equal(bare("user@host/"), nil, "invalid JID is nil");
55 end 55 end
56 56
57 function compare(compare)
58 assert_equal(compare("host", "host"), true, "host should match");
59 assert_equal(compare("host", "other-host"), false, "host should not match");
60 assert_equal(compare("other-user@host/resource", "host"), true, "host should match");
61 assert_equal(compare("other-user@host", "user@host"), false, "user should not match");
62 assert_equal(compare("user@host", "host"), true, "host should match");
63 assert_equal(compare("user@host/resource", "host"), true, "host should match");
64 assert_equal(compare("user@host/resource", "user@host"), true, "user and host should match");
65 assert_equal(compare("user@other-host", "host"), false, "host should not match");
66 assert_equal(compare("user@other-host", "user@host"), false, "host should not match");
67 end