diff --git a/src/Lib.hs b/src/Lib.hs index 6080dcf..3d7b925 100644 --- a/src/Lib.hs +++ b/src/Lib.hs @@ -38,10 +38,10 @@ substitute from to file = T.replace (T.pack from) (T.pack to) <$> T.readFile file >>= T.writeFile file substituteInteractive :: - String -> -- From - String -> -- To - FilePath -> -- File - IO () + String -> -- From + String -> -- To + FilePath -> -- File + IO () substituteInteractive from to file = do original <- T.readFile file let changed = T.replace (T.pack from) (T.pack to) original