diff --git a/src/Text/Decker/Internal/Crrrunch.hs b/src/Text/Decker/Internal/Crrrunch.hs index b2701050..1d8b93ad 100644 --- a/src/Text/Decker/Internal/Crrrunch.hs +++ b/src/Text/Decker/Internal/Crrrunch.hs @@ -66,8 +66,8 @@ crunchAllRecordings context = do putStrLn "# )" concatVideoMp4' fast list recording -- removeFile list - whenM (needsRebuild (publicDir recording) [recording]) - $ copyFile recording (publicDir recording) + -- whenM (needsRebuild (publicDir recording) [recording]) + -- $ copyFile recording (publicDir recording) -- | Rules for transcoding videos. Mp4 videos are recreated with higher -- compression parameters if any of the recording fragments changed. Also, if