X-Git-Url: https://git.jsancho.org/?p=blog.git;a=blobdiff_plain;f=haunt.scm;h=21cb4ce8d49334440610e820671ac108e5750e51;hp=64ea236d5f62b439437afe670ffdbfcbf3ce2418;hb=refs%2Fheads%2Fspanish;hpb=f2d55c49c9390d17a79f149a51d890fe383309aa

diff --git a/haunt.scm b/haunt.scm
index 64ea236..21cb4ce 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)