diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-07 23:09:05 +0200 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2009-10-07 23:09:05 +0200 |
| commit | 642111b90390a96992ffac160e402cfbed309e08 (patch) | |
| tree | 419e9da504875d7e82339054d70b5bd13d0d37bf /journal.lisp | |
| parent | 2a9daa9f73c6b6a9663a69799c4f22e8b0afcd87 (diff) | |
Only show comments that have been marked as non-spam.
Ignore-this: a4902d3cf1e4596c928d5c3ba8b6990c
darcs-hash:78d565dad4cfbfdd9a515c96086c8100dee6022d
Diffstat (limited to 'journal.lisp')
| -rwxr-xr-x | journal.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/journal.lisp b/journal.lisp index e1fe6a5..dbadd00 100755 --- a/journal.lisp +++ b/journal.lisp @@ -90,6 +90,7 @@ (let ((number 0)) (dolist (journal-comment (select 'journal-comment + :where [= [slot-value 'journal-comment 'spam-p] "f"] :order-by '(([date] :desc)) :flatp t)) (with-slots (entry uuid date body author website spam-p id) |