33 lines
562 B
33 lines
562 B
package NGCP::Panel::Widget::Plugin::AdminTopMenuSettings;
|
|
use Moose::Role;
|
|
|
|
has 'template' => (
|
|
is => 'ro',
|
|
isa => 'Str',
|
|
default => 'widgets/admin_topmenu_settings.tt'
|
|
);
|
|
|
|
has 'type' => (
|
|
is => 'ro',
|
|
isa => 'Str',
|
|
default => 'topmenu_widgets',
|
|
);
|
|
|
|
around handle => sub {
|
|
my ($foo, $self, $c) = @_;
|
|
return;
|
|
};
|
|
|
|
sub filter {
|
|
my ($self, $c, $type) = @_;
|
|
|
|
return $self if(
|
|
$type eq $self->type &&
|
|
$c->check_user_roles(qw/administrator/)
|
|
);
|
|
return;
|
|
}
|
|
|
|
1;
|
|
# vim: set syntax=perl tabstop=4 expandtab:
|