lemonldap-ng/lemonldap-ng-manager/t/test-lib.pm

29 lines
373 B
Perl
Raw Normal View History

# Base library for tests
use strict;
use Data::Dumper;
use_ok('Lemonldap::NG::Manager::Cli::Lib');
our $client;
ok(
$client =
Lemonldap::NG::Manager::Cli::Lib->new( iniFile => 't/lemonldap-ng.ini' ),
'Client object'
);
sub client {
return $client;
}
2015-05-14 08:45:03 +02:00
our $count = 2;
sub count {
my $c = shift;
$count += $c if ($c);
return $count;
}
1;