diff --git a/tekuti/post.scm b/tekuti/post.scm
index e176232..2b96c3f 100644
--- a/tekuti/post.scm
+++ b/tekuti/post.scm
@@ -125,12 +125,12 @@
   (dsu-sort
    (map (lambda (pair)
           (blob->comment (car pair) (cadr pair)))
-        (git-ls-tree (assq-ref post 'sha1) "comments"))
+        (git-ls-tree (string-append (assq-ref post 'sha1) ":comments") #f))
    comment-timestamp
    <))
 
 (define (post-n-comments post)
-  (length (git-ls-tree (assq-ref post 'sha1) "comments")))
+  (length (git-ls-tree (string-append (assq-ref post 'sha1) ":comments") #f)))
 
 (define (munge-post old-key parsed)
   (let ((metadata (with-output-to-blob