From e3f72a5cba6b0df852401878d4a290bac303adc6 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Wed, 7 Jan 2009 23:28:38 +0100 Subject: Fix major feed lossage introduced by recent changes. darcs-hash:f1ab5fb9c97a6bdb2da1f639975c80aae5b831f8 --- journal.lisp | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'journal.lisp') diff --git a/journal.lisp b/journal.lisp index 1020de8..b0b7190 100755 --- a/journal.lisp +++ b/journal.lisp @@ -112,7 +112,10 @@ ("xml:lang" "de") ("xml:base" ,(link-to :index :absolute t)))) (with-tag ("div" '(("xmlns" "http://www.w3.org/1999/xhtml"))) - (xml-as-is (journal-markup->html (body-of journal-comment)))))))))))))) + (xml-as-is + (with-yaclml-output-to-string + (<:as-html + (render-comment-body body))))))))))))))) #.(restore-sql-reader-syntax-state)) @@ -181,9 +184,7 @@ ("xml:lang" "de") ("xml:base" ,(link-to :index :absolute t)))) (with-tag ("div" '(("xmlns" "http://www.w3.org/1999/xhtml"))) - (xml-as-is (with-yaclml-output-to-string - (<:as-html - (render-comment-body (body-of journal-entry))))))))))))))) + (xml-as-is (journal-markup->html (body-of journal-comment))))))))))))) #.(restore-sql-reader-syntax-state)) -- cgit v1.2.3