1 files changed, 3 insertions, 6 deletions

diff --git a/tests/info-hash.hs b/tests/info-hash.hs
index 07c01c9c..1638a205 100644
--- a/tests/info-hash.hs
+++ b/tests/info-hash.hs
@@ -1,23 +1,20 @@
 {-# LANGUAGE OverloadedStrings #-}
 module Main (main) where
 
-import Data.Foldable
 import           Data.ByteString (ByteString)
 import qualified Data.ByteString as B
 import qualified Data.ByteString.Char8 as BC
 import qualified Data.ByteString.Lazy as L
-import qualified Data.ByteString.Builder as B
-import qualified Data.ByteString.Builder.Prim as B
+
 import Data.Torrent
+import Data.Torrent.InfoHash
+
 import System.Environment
 import System.Exit
 
 checkInfo :: ByteString
 checkInfo = "0221caf96aa3cb94f0f58d458e78b0fc344ad8bf"
 
-ppHex :: B.ByteString -> B.ByteString
-ppHex = L.toStrict . B.toLazyByteString . foldMap (B.primFixed B.word8HexFixed) . B.unpack
-
 torrentFileName :: String
 torrentFileName = "tests/dapper-dvd-amd64.iso.torrent"