Use fmap instead of <$> so ghc 7.8 won't fail.

bergmannf · Jan 20, 2016 · e8af8d8 · e8af8d8
1 parent 40bac3d
commit e8af8d8
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Network/Gitit/Export.hs b/src/Network/Gitit/Export.hs
@@ -191,7 +191,8 @@ respondOrg = respondS "org" "text/plain; charset=utf-8" ""
 #if MIN_VERSION_pandoc(1,16,0)
 respondICML :: String -> Pandoc -> Handler
 respondICML = respondX "icml" "application/xml; charset=utf-8" ""
- (\o d -> UTF8.fromStringLazy <$> writeICML o d) defaultRespOptions
+ (\o d -> fmap UTF8.fromStringLazy $ writeICML o d)
+ defaultRespOptions
 #else
 respondICML = respondS "icml" "application/xml; charset=utf-8" ""
  writeICML defaultRespOptions