register_admin_task(
{
tag
=>
'undiscoveredneighbors'
,
label
=>
'Undiscovered Neighbors'
,
provides_csv
=> 1,
}
);
get
'/ajax/content/admin/undiscoveredneighbors'
=> require_role
admin
=>
sub
{
my
@results
= schema(vars->{
'tenant'
})->resultset(
'Virtual::UndiscoveredNeighbors'
)->hri->all;
return
unless
scalar
@results
;
if
( request->is_ajax ) {
template
'ajax/admintask/undiscoveredneighbors.tt'
,
{
results
=> \
@results
, },
{
layout
=>
undef
};
}
else
{
header(
'Content-Type'
=>
'text/comma-separated-values'
);
template
'ajax/admintask/undiscoveredneighbors_csv.tt'
,
{
results
=> \
@results
, },
{
layout
=>
undef
};
}
};
1;