X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=ImplantFile.hs;h=60f9b54755911f631c693a053129867bb836f687;hb=68afccfff5a39e92903c467fac3a99734ce8a404;hp=bd01923ef9f56275f1deec021dce20d89d9ae374;hpb=cc074d0ce3f7df2544bc2baddca4e7730ecdf0a0;p=Lucu.git

diff --git a/ImplantFile.hs b/ImplantFile.hs
index bd01923..60f9b54 100644
--- a/ImplantFile.hs
+++ b/ImplantFile.hs
@@ -179,7 +179,7 @@ generateHaskellSource opts srcFile
     = do i   ← openInput srcFile (getMIMEType opts) (getETag opts)
          o   ← openOutput opts
          doc ← pprInput i modName symName
-         hPutStrLn o $ show $ to_HPJ_Doc doc
+         hPutStrLn o ∘ show $ to_HPJ_Doc doc
          hClose o
     where
       modName ∷ ModName