c405/dojo
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

parriba

Browse Source
This commit is contained in:
mynah
2020-01-22 18:22:31 -06:00
parent f16d579996
commit 174f4b0756
38 changed files with 503 additions and 473 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Dojo/Controller/Users.pm
View File

@@ -22,8 +22,7 @@ sub reg{
$self->stash(layout=>"default");
}
sub login {
sub login {
my $self = shift;
#falta si el usuario ya está registrado y llama a login.
if (($self->session('ureq')//0) == 4){ #admin
@@ -57,18 +56,21 @@ sub is_logged {
$self->session(ureq=>1,prev=>$self->url_for);
$self->redirect_to('login');
}
sub is_admin {
my $self = shift;
return 1 if ( ($self->session('pmid') //0) == 4);
$self->session(ureq=>4,prev=>$self->url_for);
$self->redirect_to('login');
}
sub is_grulla {
my $self = shift;
return 1 if (($self->session('pmid')//0)>=2);
$self->session(ureq=>2,tmpreq=>0,prev=>$self->url_for);
$self->redirect_to('login');
}
sub is_grulla_tmp{
my $self = shift;
return 1 if (($self->session('pmid')//0)>=2);