File Coverage

blib/lib/Articulate/Authorisation/AlwaysAllow.pm

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	1	1	100.0
total	17	17	100.0

package Articulate::Authorisation::AlwaysAllow;
use strict;
use warnings;

use Moo;

=head1 NAME

Articulate::Authorisation::AlwaysAllow - don't use this in production

=cut

=head1 CONFIGURATION

Put this in your C, NOT in your C or your
C. You have been warned.

  components:
    authorisation:
      Articulate::Authorisation:
        rules:
          - Articulate::Authorisation::AlwaysAllow

There's nothing else to configure, the answer is always yes.

=head1 METHODS

=head3 new

Does what all good C methods do, nothing more.

=head3 permitted

Handles all the complex business logic required to ensure that the
request is always authorised.

So don't use this in production.

=cut

sub permitted {
  my $self       = shift;
  my $permission = shift;
  $permission->grant('Anything is possible!');
}

=head1 BUGS

Don't come crying to me if you use this in production.

=cut

1;