@@ -78,7 +78,7 @@ instance PP.Pretty DerivationSource where
78 let isHackagePackage = "mirror://hackage/" `L.isPrefixOf` derivUrl
78 let isHackagePackage = "mirror://hackage/" `L.isPrefixOf` derivUrl
79 fetched = derivKind /= ""
79 fetched = derivKind /= ""
80 in if isHackagePackage then attr "sha256" $ string derivHash
80 in if isHackagePackage then attr "sha256" $ string derivHash
81− else if not fetched then attr "src" $ string derivUrl
81+ else if not fetched then attr "src" $ text derivUrl
83 [ text "src" <+> equals <+> text ("fetch" ++ derivKind) <+> lbrace
83 [ text "src" <+> equals <+> text ("fetch" ++ derivKind) <+> lbrace
84 , nest 2 $ vcat
84 , nest 2 $ vcat