From: Javier Sancho <jsf@jsancho.org>
Date: Fri, 2 Jul 2021 11:37:15 +0000 (+0000)
Subject: Merge branch 'master' into english
X-Git-Url: https://git.jsancho.org/?p=blog.git;a=commitdiff_plain;h=refs%2Fheads%2Fenglish;hp=45ebde25a8c462596f8210715ce2b5150ed0559c

Merge branch 'master' into english
---

diff --git a/haunt.scm b/haunt.scm
index db8f0b8..3554f35 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -101,7 +101,7 @@
 		     
            (define (post-summary post)
              (or (post-ref post 'summary)
-		 (get-paragraphs (cdr (post-sxml post)) 3)))
+		 (get-paragraphs (cdar (post-sxml post)) 3)))
 
            `(
 	     ,@(map (lambda (post)