hakyll and haskell fumbling

site.hs

@@ -67,7 +67,7 @@ main = hakyll $ do
   create ["new_index.html"] $ do
     route idRoute
     compile $ do
-      post <- fmap (head) recentFirst =<< loadAll "posts/*.md"
+      post <- fmap (head) . recentFirst =<< loadAll "posts/*.md"
       pandocCompiler
         >>= loadAndApplyTemplate "templates/post.html"    (postCtxWithTags tags)
         >>= loadAndApplyTemplate "templates/default.html" (postCtxWithTags tags)