--- Net-XMPP-1.0/t/roster.t~	2004-08-12 13:47:48 +0000

+++ Net-XMPP-1.0/t/roster.t	2004-12-15 02:19:05 +0000

@@ -77,7 +77,7 @@

 is($jids[0]->GetJID(), $jid1, "nogroup - jid1 matched");

 my %query = $Roster->query($jid1);

-is_deeply( \%query, { }, "jid1 - query");

+is_deeply( \%query, { groups => [] }, "jid1 - query");

 %query = $Roster->query($jid2);

 is_deeply( \%query, { ask=>"no",groups=>[$group1,$group2],name=>"Test",subscription=>"both"}, "jid2 - query");