get("action", "NONE"); if($action eq "resolved") { my $id = $request->get("id", "0"); $EQW->ResolveBug($id); } $offset = $request->get("offset", "0"); $count = $EQW->CountBugs(); @bugs = $EQW->ListBugs($offset); # @bugs = ( # { who => "Kim", where => "arena (0.0, 4.0, 5.0)", target => "an_arena_fighter000", description => "Wont accept a simple summons item" } # ); ?>
Bug List
$name "; } ?>
Actions
Reporter
Where
Target
Descripton
GetBugDetails($bugkey); if(!$bug) { next; } print "
\n"; print "
Resolved
"; print "
$bug->{name}
"; print "
$bug->{zone}: ($bug->{x}, $bug->{y}, $bug->{z})
"; print "
$bug->{target}
"; print "
$bug->{bug}
"; print "
\n"; } ?>
$name "; } ?>