Commit 54491c66 authored by Clément OUDOT's avatar Clément OUDOT

Use main Handler version in server signature (#1618)

parent c42aa711
package Lemonldap::NG::Handler::Main::Init; package Lemonldap::NG::Handler::Main::Init;
our $VERSION = '2.0.0'; our $VERSION = '2.0.2';
package Lemonldap::NG::Handler::Main; package Lemonldap::NG::Handler::Main;
...@@ -66,7 +66,9 @@ sub logLevelInit { ...@@ -66,7 +66,9 @@ sub logLevelInit {
# adapt server signature # adapt server signature
sub serverSignatureInit { sub serverSignatureInit {
my $class = shift; my $class = shift;
$class->setServerSignature("Lemonldap::NG/$VERSION"); require Lemonldap::NG::Handler;
my $version = $Lemonldap::NG::Handler::VERSION;
$class->setServerSignature("Lemonldap::NG/$version");
} }
## @ifn protected void statusInit() ## @ifn protected void statusInit()
...@@ -107,7 +109,7 @@ sub statusInit { ...@@ -107,7 +109,7 @@ sub statusInit {
exec $perl_exec, '-MLemonldap::NG::Handler::Lib::Status', exec $perl_exec, '-MLemonldap::NG::Handler::Lib::Status',
# Insert @INC in Perl path # Insert @INC in Perl path
map( { "-I$_" } @INC ), map( {"-I$_"} @INC ),
# Command to launch # Command to launch
'-e', '&Lemonldap::NG::Handler::Lib::Status::run()', '-e', '&Lemonldap::NG::Handler::Lib::Status::run()',
......
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