diff options
| author | Guilhem Moulin <guilhem.moulin@fripost.org> | 2013-01-20 03:04:17 +0100 |
|---|---|---|
| committer | Guilhem Moulin <guilhem.moulin@fripost.org> | 2013-01-20 03:04:17 +0100 |
| commit | 35c4ad13a52bdcaab251358e4b7df99dd852c76d (patch) | |
| tree | 8fcafeae85ae97332a6a5e9d0ff2abcd178e537b /lib/Fripost/Schema/Local.pm | |
| parent | f7701a60f217ab154fe53a5d13bbd223f6182150 (diff) | |
New domains.
Diffstat (limited to 'lib/Fripost/Schema/Local.pm')
| -rw-r--r-- | lib/Fripost/Schema/Local.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/Fripost/Schema/Local.pm b/lib/Fripost/Schema/Local.pm index 5ca833c..c342f23 100644 --- a/lib/Fripost/Schema/Local.pm +++ b/lib/Fripost/Schema/Local.pm @@ -141,10 +141,11 @@ sub exists { foreach (@tests) { my $dn = canonical_dn($_, {fvd => $d}, @{$self->suffix}); - my $mesg = $self->ldap->search( base => $dn, - scope => 'base', - deref => 'never', - filter => 'objectClass=*' + my $mesg = $self->ldap->search( base => $dn + , scope => 'base' + , deref => 'never' + , filter => 'objectClass=*' + , attrs => [] ); return 1 unless $mesg->code; # 0 Success unless ($mesg->code == 32) { # 32 No such object |