diff options
| author | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-21 08:59:56 -0700 |
|---|---|---|
| committer | ckonstanski <ckonstanski@pippiandcarlos.com> | 2020-12-21 08:59:56 -0700 |
| commit | 0ed1cba1b39daaf8eef693233f081b455c88dece (patch) | |
| tree | 0322ba1444ef724d4613e3c26ed2679e71bf1882 /json/json-utils.lisp | |
| parent | bac1df6134eee78b79810d13c71a2b22b4739a12 (diff) | |
stuff
Diffstat (limited to 'json/json-utils.lisp')
| -rw-r--r-- | json/json-utils.lisp | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/json/json-utils.lisp b/json/json-utils.lisp index 6467cbb..90262ef 100644 --- a/json/json-utils.lisp +++ b/json/json-utils.lisp @@ -3,8 +3,6 @@ (in-package #:ldapadmin) -;; ========================================================================== ;; - (defun json-to-object (object-type json-obj) (remove-if-not (lambda (x) (let ((found-value nil)) @@ -21,8 +19,6 @@ object)) json-obj))) -;; ========================================================================== ;; - (defun objects-to-json (list-of-objects &optional (explicit-encoder-p nil)) (labels ((objectp (object) (not (eq () (remove-if 'null (mapcar (lambda (superclass) |