From 8b833a462a753b7db38e3cb744947285031f93f4 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Sun, 14 Nov 2021 21:27:04 +0100
Subject: disable print output when copying files

(this would otherwise break the json schema if `--json` is given)
---
 lib/WriteRepo.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

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
-- 
cgit v1.2.3