From 6b8f39b642ec0617711161c5b70e5fe3dc802e4a Mon Sep 17 00:00:00 2001 From: Matthias Andreas Benkard Date: Wed, 16 Mar 2011 01:18:24 +0100 Subject: Be more tolerant towards PostgreSQL 8.4. --- mulkcms.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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) -- cgit v1.2.3