User:AnomieBOT/source/AnomieBOT/API/Iterator.pm: Difference between revisions

Revision as of 02:25, 16 April 2009

Revision as of 02:22, 10 May 2009

Line 62:

my @res=values %{$res->{'query'}};

if(@res < 1){

return {

_ok_ => 0,

code => 'notiterable',

error => 'The result set contained no nodes under the query node',

};

}

if(@res > 1){

return {

Line 75 ⟶ 68:

error => 'The result set contained too many nodes under the query node: '.join(', ', keys %{$res->{'query'}}),

};

if} elsif(@res <> 10){

my $ret=$res[0];

$ret=[ values %$ret ] if ref($ret) eq 'HASH';

if(ref($ret) ne 'ARRAY'){

return {

_ok_ => 0,

code => 'notiterablewtferror',

error => 'The result setnode containedlist nois nodesnot underan thearray queryor nodehash reference. WTF?',

};

};

$self->{'res'}=$ret;

}

my $ret=$res[0];

$ret=[ values %$ret ] if ref($ret) eq 'HASH';

if(ref($ret) ne 'ARRAY'){

return {

_ok_ => 0,

code => 'wtferror',

error => 'The result node list is not an array or hash reference. WTF?',

};

}

$self->{'res'}=$ret;

if(exists($res->{'query-continue'})){