From 23f65542a32de726c8b605e108094b74c7a3d137 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Wed, 7 Oct 2009 23:31:28 +0200
Subject: Fix yet another typo.

Ignore-this: 19f02efdf14c355631e75a6de76f2dec

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

(limited to 'main.lisp')

diff --git a/main.lisp b/main.lisp
index 50e3af1..9bc8d43 100644
--- a/main.lisp
+++ b/main.lisp
@@ -181,7 +181,7 @@
                          (update-records-from-instance comment)
                          (update-records-from-instance entry)
                          (unless (spamp comment)
-                           (update-records 'journal-comment
+                           (update-records 'journal_comment
                                            :where [= [slot-value 'journal-comment 'id] (id-of comment)]
                                            :av-pairs `((spam_p nil))))
                          (when (eq *site* :nfs.net)
-- 
cgit v1.2.3