Hide windows stuff on unix

haskell · Jan 12, 2025 · 905df40 · 905df40
1 parent 50264de
commit 905df40
Showing 1 changed file with 2 additions and 2 deletions.
diff --git 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)