diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-03-16 01:18:24 +0100 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2011-03-16 01:18:24 +0100 |
| commit | 6b8f39b642ec0617711161c5b70e5fe3dc802e4a (patch) | |
| tree | 7d6198ce85fbcf0ff10bf42eed807f9ebcb56353 /mulkcms.lisp | |
| parent | 74a83135ea8a0d4def129ab1c76ce2637efaf1fd (diff) | |
Be more tolerant towards PostgreSQL 8.4.
Diffstat (limited to 'mulkcms.lisp')
| -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) |