File Coverage

blib/lib/Labyrinth/Plugin/Core.pm

Criterion	Covered	Total	%
statement	9	9	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	12	12	100.0

package Labyrinth::Plugin::Core;

use warnings;
use strict;

our $VERSION = '5.18';

#----------------------------------------------------------------------------
# Libraries

use base qw(Labyrinth::Plugin::Base);

use Labyrinth::Variables;

#----------------------------------------------------------------------------
# Public Interface Functions

sub Editor      { return  unless AccessUser(EDITOR);    }
sub Publisher   { return  unless AccessUser(PUBLISHER); }
sub Admin       { return  unless AccessUser(ADMIN);     }
sub Master      { return  unless AccessUser(MASTER);    }

1;

__END__