From 4850ffaef859a3f33f03c5500602881e30b1039c Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Tue, 22 Dec 2020 20:57:44 -0700 Subject: Moved core to its own library --- ldap/ldap.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'ldap') diff --git a/ldap/ldap.lisp b/ldap/ldap.lisp index 0c16414..2d477e4 100644 --- a/ldap/ldap.lisp +++ b/ldap/ldap.lisp @@ -120,8 +120,8 @@ binddn. Returns `t' if the password is valid, `nil' otherwise." \"Konstanski\"))' to an LDAP search base fragment like \"(givenname=Carlos)(sn=Konstanski)\". Any `nil' or empty-string values are ignored." - (reduce-to-char-separated-string (mapcar (lambda (term) - (when (not (null-or-empty-p (cadr term))) + (org-ckons-core::reduce-to-char-separated-string (mapcar (lambda (term) + (when (not (org-ckons-core::null-or-empty-p (cadr term))) (format nil "(~a=~a)" (symbol-name (car term)) -- cgit v1.3