From 6b8f39b642ec0617711161c5b70e5fe3dc802e4a Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
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