From 8a8e0fadae12cbacaf8474b09c16ee8c01ebfe26 Mon Sep 17 00:00:00 2001
From: Andreas Rottmann
Date: Fri, 5 Nov 2010 22:27:15 +0100
Subject: post: make `post-comments' and `post-n-comments' work with current
 git

Apparently, at least git 1.7.2.3 ls-files does not understand the
SHA1:filename syntax anymore.
---
 tekuti/post.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tekuti/post.scm b/tekuti/post.scm
index 2b96c3f..e176232 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 (string-append (assq-ref post 'sha1) ":comments") #f))
+        (git-ls-tree (assq-ref post 'sha1) "comments"))
    comment-timestamp
    <))
 
 (define (post-n-comments post)
-  (length (git-ls-tree (string-append (assq-ref post 'sha1) ":comments") #f)))
+  (length (git-ls-tree (assq-ref post 'sha1) "comments")))
 
 (define (munge-post old-key parsed)
   (let ((metadata (with-output-to-blob
-- 
cgit v1.2.3-54-g00ecf