diff --git a/lib/Properties.hs b/lib/Properties.hs index f142493f5ba2bf22f3bb82338b3898f1afa0e655..b2d4974c41d8a50e4fccb48a3ca77c1616560f42 100644 --- a/lib/Properties.hs +++ b/lib/Properties.hs @@ -706,7 +706,7 @@ unwrapURI sym p@(Property name _) f g = unwrapString p $ \link -> do DomainDoesNotExist domain -> "The domain " <> domain <> " does not exist; \ \please make sure it is spelled correctly." SchemaDoesNotExist schema -> - "the URI schema " <> schema <> ":// does not exist." + "the URI schema " <> schema <> ":// cannot be used." WrongScope schema allowed -> "the URI schema " <> schema <> ":// cannot be used in property \ \\"" <> name <> "\"; allowed "