Split PSGI

lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main.pm

+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;

lemonldap-ng-portal/lib/Lemonldap/NG/Portal/PSGI.pm → lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Init.pm

 ##@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;