Second part of fix for 8636 - When returning an ACL without SECINFO_DACL requested...
[Samba.git] / selftest / test_samba4.pl
blob416bf1d1db93dab9a1431629ab569965c1204165
1 #!/usr/bin/perl
3 use Test::More tests => 3;
4 use FindBin qw($RealBin);
5 use lib $RealBin;
6 use lib "$RealBin/target";
7 use Samba4;
9 my $s = new Samba4("bin", undef, $RealBin."/../setup");
11 ok($s);
13 is("bin", $s->{bindir});
15 ok($s->write_ldb_file("tmpldb", "
16 dn: a=b
17 a: b
18 c: d
19 "));
21 unlink("tmpldb");