diff options
Diffstat (limited to 'lib/Uris.hs')
| -rw-r--r-- | lib/Uris.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Uris.hs b/lib/Uris.hs index 598aa46..5c2ad05 100644 --- a/lib/Uris.hs +++ b/lib/Uris.hs @@ -97,8 +97,9 @@ applySubsts s substs uri = do pure (prefix <> rest) Prefixed {..} | domain `elem` blocked -> Left IsBlocked - | domain `elem` allowed -> Right uri + | domain `elem` allowed || pack "streamproxy.rc3.world" `T.isSuffixOf` domain -> Right uri | otherwise -> Right (prefix <> URI.encodeText uri) Allowed _ domains -> if domain `elem` domains + || pack "streamproxy.rc3.world" `T.isSuffixOf` domain then Right uri else Left (DomainIsBlocked domains) |