summaryrefslogtreecommitdiff
path: root/mulkcms.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'mulkcms.lisp')
-rw-r--r--mulkcms.lisp4
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)