File Coverage

blib/lib/Dancer2/Plugin/AppRole/Helper.pm

Criterion	Covered	Total	%
statement	11	11	100.0
branch	2	2	100.0
condition			n/a
subroutine	4	4	100.0
pod	2	2	100.0
total	19	19	100.0

package Dancer2::Plugin::AppRole::Helper;

use strictures 2;

our $VERSION = '1.152121'; # VERSION

# ABSTRACT: helper functions for creating Dancer2 AppRole plugins

#
# This file is part of Dancer2-Plugin-AppRole-Helper
#
#
# Christian Walde has dedicated the work to the Commons by waiving all of his
# or her rights to the work worldwide under copyright law and all related or
# neighboring legal rights he or she had in the work, to the extent allowable by
# law.
#
# Works under CC0 do not require attribution. When citing the work, you should
# not imply endorsement by the author.
#


use parent 'Exporter';

our @EXPORT = qw(ensure_approle ensure_approle_s);


sub ensure_approle {
    my ( $role, $dsl ) = @_;
    my $app = $dsl->app;
    return if $app->does( $role );
    Moo::Role->apply_roles_to_object( $app, $role );
}


sub ensure_approle_s { ensure_approle "Dancer2::Plugin::AppRole::" . shift, @_ }

1;

__END__