From 905df40cfdf4638e5d8339bf0c76da6bfa053844 Mon Sep 17 00:00:00 2001 From: Julian Ospald Date: Sun, 12 Jan 2025 22:05:39 +0800 Subject: [PATCH] Hide windows stuff on unix --- lib-opt/GHCup/OptParse/DInfo.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib-opt/GHCup/OptParse/DInfo.hs b/lib-opt/GHCup/OptParse/DInfo.hs index 0337c752..e00da1a4 100644 --- a/lib-opt/GHCup/OptParse/DInfo.hs +++ b/lib-opt/GHCup/OptParse/DInfo.hs @@ -79,9 +79,9 @@ prettyDebugInfo DebugInfo { diDirs = Dirs { .. }, ..} = "logs: " <> fromGHCupPath logsDir <> "\n" <> "config: " <> fromGHCupPath confDir <> "\n" <> "db: " <> fromGHCupPath dbDir <> "\n" <> - "recycle: " <> fromGHCupPath recycleDir <> "\n" <> + (if isWindows then ("recycle: " <> fromGHCupPath recycleDir <> "\n") else mempty) <> "temp: " <> fromGHCupPath tmpDir <> "\n" <> - "msys2: " <> msys2Dir <> "\n" <> + (if isWindows then ("msys2: " <> msys2Dir <> "\n") else mempty) <> "\n===== Metadata ======\n" <> intercalate "\n" ((\(c, u) -> (T.unpack . channelAliasText) c <> ": " <> (T.unpack . decUTF8Safe . serializeURIRef') u) <$> diChannels)