disable print output when copying files

(this would otherwise break the json schema if `--json` is given)

1 files changed, 2 insertions, 2 deletions

diff --git a/lib/WriteRepo.hs b/lib/WriteRepo.hs
index 52f0736..89e1bea 100644
--- a/lib/WriteRepo.hs
+++ b/lib/WriteRepo.hs
@@ -28,7 +28,7 @@ import           Types                  (Dep (Local))
 writeAdjustedRepository :: LintConfig' -> FilePath -> FilePath -> DirResult -> IO ExitCode
 writeAdjustedRepository config inPath outPath result
   | resultIsFatal result && not (configDontCopyAssets config) = do
-      putStrLn "FATAL: Repository has missing assets; cannot write to outPath"
+      -- putStrLn "FATAL: Repository has missing assets; cannot write to outPath"
       pure (ExitFailure 1)
   | otherwise = do
       createDirectoryIfMissing True outPath
@@ -57,7 +57,7 @@ writeAdjustedRepository config inPath outPath result
             assetPath = FP.normalise $ inPath </> path
             newPath = FP.normalise $ outPath </> path
           in do
-            putStrLn $ "copying " <> assetPath <> " → " <> newPath
+            -- putStrLn $ "copying " <> assetPath <> " → " <> newPath
             copyFile assetPath newPath
 
       pure ExitSuccess