From 237847bae92c2579cc67bdb941c604165c502971 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Wed, 7 Oct 2009 23:29:58 +0200
Subject: Fix a typo.

Ignore-this: e7eb9f2a961b5c8e87dde5470973759e

darcs-hash:b316126630a03508c5d92aa2bdae7201ee41cc3f
---
 main.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'main.lisp')

diff --git a/main.lisp b/main.lisp
index 9dbe04e..36de3d9 100644
--- a/main.lisp
+++ b/main.lisp
@@ -183,7 +183,7 @@
                          (unless (spamp comment)
                            (update-records 'journal-comment
                                            :where [= [slot-value 'journal-comment 'id] (id-of comment)]
-                                           :avpairs `((spam-p nil))))
+                                           :av-pairs `((spam-p nil))))
                          (when (eq *site* :nfs.net)
                            (mail-comment *notification-email* comment entry))))
                      (show-web-journal))
-- 
cgit v1.2.3