~singpolyma/xmpp-blog-utils

0792548cc850a1e9cd12cb1d53a760f2f5c32f59 — Stephen Paul Weber 1 year, 5 months ago 8026181
typo
1 files changed, 2 insertions(+), 2 deletions(-)

M pubsub-entry-publish.hs
M pubsub-entry-publish.hs => pubsub-entry-publish.hs +2 -2
@@ 118,11 118,11 @@ main = do
				$ Blaze.text $ title config
			Blaze.toMarkup (author config)
			Blaze.customLeaf (s"link") True
				! customAttribute (s"rel") (s"alernate")
				! customAttribute (s"rel") (s"alternate")
				! customAttribute (s"href") (Blaze.toValue itemUri)
			forM_ (httpUri config) $ \http ->
				Blaze.customLeaf (s"link") True
					! customAttribute (s"rel") (s"alernate")
					! customAttribute (s"rel") (s"alternate")
					! customAttribute (s"type") (s"text/html")
					! customAttribute (s"href") (Blaze.toValue http)
			when (comments config) $