Skip to content

Commit

Permalink
DONTMERGE
Browse files Browse the repository at this point in the history
  • Loading branch information
fujimura committed Mar 14, 2024
1 parent 4737503 commit aa16cd7
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions src/Lib.hs
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down

0 comments on commit aa16cd7

Please sign in to comment.