fixup! [#270] Handle relative redirects

serokell · Jan 26, 2023 · d2c778b · d2c778b
1 parent 529db9d
commit d2c778b
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/src/Xrefcheck/Data/URI.hs b/src/Xrefcheck/Data/URI.hs
@@ -5,7 +5,7 @@
 
 {-# LANGUAGE ExistentialQuantification #-}
 
-module Xrefcheck.Data.Uri
+module Xrefcheck.Data.URI
   ( UriParseError (..)
   , parseUri
   ) where

diff --git a/src/Xrefcheck/Verify.hs b/src/Xrefcheck/Verify.hs
@@ -69,7 +69,7 @@ import Time (RatioNat, Second, Time (..), ms, sec, threadDelay, timeout, (+:+),
 import Control.Monad.Trans.Except (withExceptT)
 import Xrefcheck.Config
 import Xrefcheck.Core
-import Xrefcheck.Data.Uri
+import Xrefcheck.Data.URI
 import Xrefcheck.Orphans ()
 import Xrefcheck.Progress
 import Xrefcheck.Scan

diff --git a/tests/Test/Xrefcheck/URIParsingSpec.hs b/tests/Test/Xrefcheck/URIParsingSpec.hs
@@ -13,7 +13,7 @@ import Text.URI (URI)
 import Text.URI.QQ (uri)
 import URI.ByteString qualified as URIBS
 
-import Xrefcheck.Data.Uri (UriParseError (..), parseUri)
+import Xrefcheck.Data.URI (UriParseError (..), parseUri)
 
 test_uri :: [TestTree]
 test_uri =