on master help sign in
Slightly nicer check plan output
096b547Michael Snoyman
Stackage2/CheckBuildPlan.hs+2−1
@@ -79,7 +79,8 @@ instance Show BadBuildPlan where
79 unpack $ concatMap go $ mapToList errs
79 unpack $ concatMap go $ mapToList errs
80 where
80 where
81 go ((dep, mdepVer), users) = unlines
81 go ((dep, mdepVer), users) = unlines
82+ $ ""
82− $ showDepVer dep mdepVer
83+ : showDepVer dep mdepVer
83 : map showUser (mapToList users)
84 : map showUser (mapToList users)
84
85
85 showDepVer :: PackageName -> Maybe Version -> Text
86 showDepVer :: PackageName -> Maybe Version -> Text