Commit 2244a8c2 authored by Yadd's avatar Yadd
Browse files

Split PSGI

parent 64523473
package Lemonldap::NG::Portal::Main;
use strict;
use Mouse;
our $VERSION = '2.0.0';
extends qw(Lemonldap::NG::Handler::PSGI::Try Lemonldap::NG::Portal::Main::Init);
has stack => ( is => 'rw' );
# ENTRY POINT METHODS
# -------------------
# All methods below have been declared as Lemonldap::NG::Common::PSGI::Router
# routes (see Lemonldap::NG::Portal::Main::Init)
sub issuerForAuthUser {
my ( $self, $type, $req ) = @_;
}
sub issuerForUnauthUser {
my ( $self, $type, $req ) = @_;
}
# TODO in run
# - mustRedirect
1;
##@file
# FastCGI package for Lemonldap::NG portal
#
##@class Lemonldap::NG::Portal::PSGI
##@class Lemonldap::NG::Portal::Main::Init
# FastCGI class for Lemonldap::NG portal
package Lemonldap::NG::Portal::PSGI;
package Lemonldap::NG::Portal::Main::Init;
use strict;
use Mouse;
......@@ -14,8 +14,6 @@ our $VERSION = '2.0.0';
use constant HANDLER => 'Lemonldap::NG::Handler::PSGI::API';
extends 'Lemonldap::NG::Handler::PSGI::Try';
# Configuration storage
has localConfig => ( is => 'rw', default => sub { {} } );
has conf => ( is => 'rw', default => sub { {} } );
......@@ -192,15 +190,4 @@ sub loadModule {
return 1;
}
sub issuerForAuthUser {
my ( $self, $type, $req ) = @_;
}
sub issuerForUnauthUser {
my ( $self, $type, $req ) = @_;
}
# TODO in run
# - mustRedirect
1;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment