From 0ed1cba1b39daaf8eef693233f081b455c88dece Mon Sep 17 00:00:00 2001 From: ckonstanski Date: Mon, 21 Dec 2020 08:59:56 -0700 Subject: stuff --- json/json-utils.lisp | 4 ---- 1 file changed, 4 deletions(-) (limited to 'json') 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) -- cgit v1.3