diff options
| author |  Andy Wingo | 2008-02-24 21:21:41 +0100 |
|---|---|---|
| committer | Andy Wingo | 2008-02-24 21:21:41 +0100 |
| commit | caf961831278c981ea2ccbc7b689bf1b71849114 (patch) | |
| tree | d1f8e90933575e31f9e0076daee99b05b2769a08 /tekuti/post.scm | |
| parent | 85b09abad7804eb567824c7142373d57bba891d1 (diff) | |
| download | tekuti-caf961831278c981ea2ccbc7b689bf1b71849114.tar.gz tekuti-caf961831278c981ea2ccbc7b689bf1b71849114.zip | |
atom feed maybe working
Diffstat (limited to 'tekuti/post.scm')
| -rw-r--r-- | tekuti/post.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tekuti/post.scm b/tekuti/post.scm index 7177d12..cafd4e0 100644 --- a/tekuti/post.scm +++ b/tekuti/post.scm @@ -166,7 +166,7 @@ ,(comment-form post "" "" "" "")))))) (define (post-n-comments post) - (length (git-ls-subdirs (assq-ref post 'sha1) "comments/"))) + (length (git-ls-subdirs (string-append (assq-ref post 'sha1) ":comments") #f))) (define (post-sxml-n-comments post) `(div (@ (class "feedback")) |