dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Avoid debug warning

Browse Source
This commit is contained in:
Christophe Maudoux 2018-07-26 20:52:16 +02:00
parent 226b64cde0
commit 52e11ea8c1
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
_example/test/oauth2.pl
View File

@ -20,7 +20,8 @@ use Digest::SHA
#==============================================================================
my $host = $ENV{HTTP_HOST};
my ( $domain, $port ) = ( $host =~ /\w+\.([^:]+)(:\d+)?/ );
my $protocol = ( $ENV{HTTPS} =~ /^on$/i ) ? "https" : "http";
my $protocol = ( $ENV{HTTPS} =~ /^on$/i ) ? "https" : "http";
$port ||= "";
my $portal_url = "$protocol://auth.$domain$port";
my $client_id = "lemonldap";
my $client_secret = "secret";