Skip to content

Commit e7aaf60

Browse files
parsonsmattMikolaj
authored andcommitted
prettyShow
1 parent 279e137 commit e7aaf60

File tree

1 file changed

+3
-3
lines changed
  • Cabal/src/Distribution/PackageDescription

1 file changed

+3
-3
lines changed

Cabal/src/Distribution/PackageDescription/Check.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -883,7 +883,7 @@ checkGlobResult title fp rs = dirCheck ++ catMaybes (map getWarning rs)
883883
where
884884
dirCheck
885885
| all (not . withoutNoMatchesWarning) rs =
886-
[PackageDistSuspiciousWarn $ GlobNoMatch title (show fp)]
886+
[PackageDistSuspiciousWarn $ GlobNoMatch title (prettyShow fp)]
887887
| otherwise = []
888888

889889
-- If there's a missing directory in play, since globs in Cabal packages
@@ -902,9 +902,9 @@ checkGlobResult title fp rs = dirCheck ++ catMaybes (map getWarning rs)
902902
-- suffix. This warning detects when pre-2.4 package descriptions
903903
-- are omitting files purely because of the stricter check.
904904
getWarning (GlobWarnMultiDot file) =
905-
Just $ PackageDistSuspiciousWarn (GlobExactMatch title (show fp) file)
905+
Just $ PackageDistSuspiciousWarn (GlobExactMatch title (prettyShow fp) file)
906906
getWarning (GlobMissingDirectory dir) =
907-
Just $ PackageDistSuspiciousWarn (GlobNoDir title (show fp) dir)
907+
Just $ PackageDistSuspiciousWarn (GlobNoDir title (prettyShow fp) dir)
908908
-- GlobMatchesDirectory is handled elsewhere if relevant;
909909
-- we can discard it here.
910910
getWarning (GlobMatchesDirectory _) = Nothing

0 commit comments

Comments
 (0)