update usage of count-tuples

db4
Doug Coleman 2008-09-24 18:00:48 -05:00
parent 969763e807
commit 2eb5d3b36d
1 changed files with 1 additions and 1 deletions

View File

@ -90,7 +90,7 @@ M: comment entity-url
: list-posts ( -- posts )
f <post> "author" value >>author
select-tuples [ dup id>> f <comment> f count-tuples >>comments ] map
select-tuples [ dup id>> f <comment> count-tuples >>comments ] map
reverse-chronological-order ;
: <list-posts-action> ( -- action )