Restrict Pretty module exports/imports.

diff --git a/src/Domain.hs b/src/Domain.hs
index 8d1e0885c8ae57739a6a24c8e5ec697739e57c7c..3ef6f26597a89c730dbb5a36fe14e8e1c5147af4 100644 (file)
--- a/src/Domain.hs
+++ b/src/Domain.hs
@@ -25,7 +25,7 @@ import Text.Parsec (
 import qualified Text.Parsec as Parsec ( digit, letter)
 import Text.Parsec.String ( Parser )
 
-import Pretty
+import Pretty ( Pretty(..) )
 
 -- * Digits
 

diff --git a/src/IPv4Pattern.hs b/src/IPv4Pattern.hs
index 70322d19e8ceeaaf45cacfd13f611ba64178e1fa..dd95b13be37d4563e064428c0b52ea109d6c49b6 100644 (file)
--- a/src/IPv4Pattern.hs
+++ b/src/IPv4Pattern.hs
@@ -39,7 +39,7 @@ import Text.Parsec (
 import Text.Parsec.String ( Parser )
 import Text.Read ( readMaybe )
 
-import Pretty
+import Pretty ( Pretty(..) )
 
 
 -- * Octets

diff --git a/src/Pretty.hs b/src/Pretty.hs
index 360bd4c1b8a4ded3875972f8a30c195284051c5e..84f9406bcd6187046442c9acddd1723f598f87d3 100644 (file)
--- a/src/Pretty.hs
+++ b/src/Pretty.hs
@@ -7,7 +7,7 @@
 --   way. The 'pretty_print' function then prints the result of
 --   'pretty_show' by default.
 --
-module Pretty
+module Pretty ( Pretty(..) )
 where
 
 import Text.Parsec ( ParseError )