diff options
| -rw-r--r-- | mulkcms.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/mulkcms.lisp b/mulkcms.lisp index 2fcfa8b..3bb2095 100644 --- a/mulkcms.lisp +++ b/mulkcms.lisp @@ -676,7 +676,9 @@ (mapcar #'parse-row (parse-array revisions))))) (list :id id - :aliases aliases + :aliases (if (eq aliases :null) + nil + aliases) :revisions revision-data :revision-num (length revision-data)))))) (when (assoc "add-alias" params :test #'equal) |