X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fharbl.git;a=blobdiff_plain;f=src%2FNetwork%2FDNS%2FRBL%2FDnsblSite.hs;fp=src%2FDnsblSite.hs;h=d23dfb1c2c73a035e61c144501f59b4b8c29bc5b;hp=46a872ba4e545695cca2ee7a4558ffa76a38a4ac;hb=bc28c407970d9ff1bfeacc88363fd6d23c0af440;hpb=e093d003defb7948f17927091c3e73a250d53e6c diff --git a/src/DnsblSite.hs b/src/Network/DNS/RBL/DnsblSite.hs similarity index 97% rename from src/DnsblSite.hs rename to src/Network/DNS/RBL/DnsblSite.hs index 46a872b..d23dfb1 100644 --- a/src/DnsblSite.hs +++ b/src/Network/DNS/RBL/DnsblSite.hs @@ -8,7 +8,7 @@ -- return code pattern is \"127.0.0.[2;10;11]\", and the weight is -- \"2". -- -module DnsblSite ( +module Network.DNS.RBL.DnsblSite ( dnsbl_site_tests, dnsbl_sites ) where @@ -32,9 +32,9 @@ import Text.Parsec ( import Text.Parsec.String ( Parser ) import Text.Read ( readMaybe ) -import Domain ( UserDomain, user_domain ) -import IPv4Pattern ( IPv4Pattern, v4pattern ) -import Pretty ( Pretty(..) ) +import Network.DNS.RBL.Domain ( UserDomain, user_domain ) +import Network.DNS.RBL.IPv4Pattern ( IPv4Pattern, v4pattern ) +import Network.DNS.RBL.Pretty ( Pretty(..) ) newtype Weight = Weight Int deriving (Eq, Show)