added conditions
This commit is contained in:
parent
707ad709ed
commit
ef2a08540a
|
@ -1,6 +1,7 @@
|
||||||
(define-interface ldap-interface
|
(define-interface ldap-interface
|
||||||
(export
|
(export
|
||||||
ldap-init
|
ldap-init
|
||||||
|
current-ldap-session
|
||||||
with-ldap-session
|
with-ldap-session
|
||||||
ldap-simple-bind
|
ldap-simple-bind
|
||||||
ldap-simple-bind-anonymous
|
ldap-simple-bind-anonymous
|
||||||
|
@ -204,7 +205,13 @@
|
||||||
&ldap-connect-error ldap-connect-error?
|
&ldap-connect-error ldap-connect-error?
|
||||||
&ldap-not-supported ldap-not-supported?
|
&ldap-not-supported ldap-not-supported?
|
||||||
&ldap-control-not-found ldap-control-not-found?
|
&ldap-control-not-found ldap-control-not-found?
|
||||||
&ldap-referral-limit-exceeded ldap-referral-limit-exceeded?))
|
&ldap-referral-limit-exceeded ldap-referral-limit-exceeded?
|
||||||
|
|
||||||
|
&ldap-filter-wrong-type ldap-filter-wrong-type?
|
||||||
|
ldap-filter-wrong-type-expected ldap-filter-wrong-type-value
|
||||||
|
|
||||||
|
&ldap-filter-internal-error ldap-filter-internal-error?
|
||||||
|
ldap-filter-internal-error-what))
|
||||||
|
|
||||||
(define-interface value-weak-table-interface
|
(define-interface value-weak-table-interface
|
||||||
(export
|
(export
|
||||||
|
|
Loading…
Reference in New Issue