Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Xavier Bachelot
lemonldap-ng
Commits
f8fb1635
Commit
f8fb1635
authored
Dec 03, 2009
by
Clément OUDOT
Browse files
Add unit test for LDAP configuration backend
parent
b32ff75a
Changes
2
Hide whitespace changes
Inline
Side-by-side
modules/lemonldap-ng-common/MANIFEST
View file @
f8fb1635
...
...
@@ -27,6 +27,7 @@ t/01-Common-Conf.t
t/02-Common-Conf-File.t
t/03-Common-Conf-DBI.t
t/04-Common-Conf-SOAP.t
t/05-Common-Conf-LDAP.t
t/20-Common-CGI.t
t/30-Common-Safelib.t
t/99-pod.t
...
...
modules/lemonldap-ng-common/t/05-Common-Conf-LDAP.t
0 → 100644
View file @
f8fb1635
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl Lemonldap-NG-Manager.t'
#########################
# change 'tests => 1' to 'tests => last_test_to_print';
use
Test::
More
tests
=>
3
;
BEGIN
{
use_ok
('
Lemonldap::NG::Common::Conf
')
}
#########################
# 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.
my
$h
;
ok
(
$h
=
new
Lemonldap::NG::Common::
Conf
(
{
type
=>
'
LDAP
',
ldapServer
=>
'
ldap://localhost
',
ldapConfBase
=>
'
ou=conf,ou=websso,dc=example,dc=com
',
ldapBindDN
=>
'
cn=admin,dc=example,dc=com
',
ldapBindPassword
=>
'
secret
',
}
)
);
ok
(
$h
->
can
('
ldap
')
);
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment