diff --git a/lib/Properties.hs b/lib/Properties.hs
index 592aac4959a792b1b9bc42443a0b487f5f058198..cabc2b764197164664f544bbf73e6eeddce190ef 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -516,9 +516,9 @@ unwrapPath str f = case parsePath str of
       then f p
       else complain $ "cannot acess paths \"" <> str <> "\" which is outside your repository."
   NotAPath -> complain $ "path \"" <> str <> "\" is invalid."
-  AbsolutePath -> complain "absolute paths are disallowed. Use world:// instead."
-  UnderscoreMapLink -> complain "map links using /_/ are disallowed. Use world:// instead."
-  AtMapLink -> complain "map links using /@/ are disallowed. Use world:// instead."
+  AbsolutePath -> forbid "absolute paths are disallowed. Use world:// instead."
+  UnderscoreMapLink -> forbid "map links using /_/ are disallowed. Use world:// instead."
+  AtMapLink -> forbid "map links using /@/ are disallowed. Use world:// instead."
 
 unwrapBadgeToken :: Text -> (BadgeToken -> LintWriter a) -> LintWriter a
 unwrapBadgeToken str f = case parseToken str of