Fix Zimbra Handler syntax (#470)
This commit is contained in:
parent
fca135fb6b
commit
abbed8d8bf
|
@ -38,4 +38,5 @@ t/20-Lemonldap-NG-Handler-CDA.t
|
|||
t/30-Lemonldap-NG-Handler-CGI.t
|
||||
t/40-Lemonldap-NG-Handler-Proxy.t
|
||||
t/50-Lemonldap-NG-Handler-SecureToken.t
|
||||
t/51-Lemonldap-NG-Handler-Zimbra.t
|
||||
t/99-pod.t
|
||||
|
|
|
@ -75,8 +75,8 @@ sub run {
|
|||
return OK unless ( $uri =~ $zimbraSsoUrl );
|
||||
|
||||
# Check mandatory parameters
|
||||
return $class->abort("No Zimbra preauth key configured");
|
||||
unless ($zimbraPreAuthKey);
|
||||
return $class->abort("No Zimbra preauth key configured")
|
||||
unless ($zimbraPreAuthKey);
|
||||
|
||||
# Build URL
|
||||
my $zimbra_url = $class->_buildZimbraPreAuthUrl(
|
||||
|
|
15
lemonldap-ng-handler/t/51-Lemonldap-NG-Handler-Zimbra.t
Normal file
15
lemonldap-ng-handler/t/51-Lemonldap-NG-Handler-Zimbra.t
Normal file
|
@ -0,0 +1,15 @@
|
|||
# Before `make install' is performed this script should be runnable with
|
||||
# `make test'. After `make install' it should work as `perl Lemonldap-NG-Handler-Proxy.t'
|
||||
|
||||
#########################
|
||||
|
||||
# change 'tests => 1' to 'tests => last_test_to_print';
|
||||
|
||||
use Test::More tests => 1;
|
||||
|
||||
#########################
|
||||
|
||||
# Insert your test code below, the Test::More module is use()ed here so read
|
||||
# its man page ( perldoc Test::More ) for help writing this test script.
|
||||
|
||||
use_ok('Lemonldap::NG::Handler::ZimbraPreAuth');
|
Loading…
Reference in New Issue
Block a user