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

Test defaultValuesInit (#558)

Browse Source
This commit is contained in:
Clément Oudot 2013-10-03 10:48:52 +00:00
parent b5c1761bf4
commit 8ae9672cf3
1 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
lemonldap-ng-handler/t/05-Lemonldap-NG-Handler-Vhost.t
View File

@ -7,7 +7,7 @@
package My::Package;
use Test::More tests => 4;
use Test::More tests => 5;
BEGIN {
use_ok('Lemonldap::NG::Handler::Vhost');
@ -23,6 +23,28 @@ our @ISA = qw( Lemonldap::NG::Handler::Vhost Lemonldap::NG::Handler::Simple );
my $h;
$h = bless {}, 'My::Package';
open STDERR, '>/dev/null';
ok(
$h->defaultValuesInit(
{
https => 0,
port => 0,
maintenance => 0,
vhostOptions => {
www1 => {
vhostHttps => 1,
vhostPort => 443,
vhostMaintenance => 1,
vhostAliases => 'www2 www3',
}
},
}
),
'defaultValuesInit'
);
ok(
$h->locationRulesInit(
{