Starting cfgAuthor job

environments/ppa-mbqj77/deployments/1
Xavier Guimard 10 years ago
parent faae7be043
commit aae896a839
  1. 16
      lemonldap-ng-handler/lib/Lemonldap/NG/Handler/PSGI.pm

@ -2,7 +2,7 @@ package Lemonldap::NG::Handler::PSGI;
use 5.10.0;
use Mouse;
use Lemonldap::NG::Handler::SharedConf qw(:tsv :variables);
use Lemonldap::NG::Handler::SharedConf qw(:tsv :variables :jailSharedVars);
extends 'Lemonldap::NG::Common::PSGI::Router';
our $VERSION = '2.0.0';
@ -71,4 +71,18 @@ sub _run {
}
}
## @method hashRef user()
# @return hash of user datas
sub user {
return $datas;
}
## @method boolean group(string group)
# @param $group name of the Lemonldap::NG group to test
# @return boolean : true if user is in this group
sub group {
my ( $self, $group ) = splice @_;
return ( $datas->{groups} =~ /\b$group\b/ );
}
1;

Loading…
Cancel
Save