diff --git a/Defaults.hs b/Defaults.hs
index 2dce155..4afbfcc 100644
--- a/Defaults.hs
+++ b/Defaults.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Defaults where
 
 
diff --git a/Diagram.hs b/Diagram.hs
index c761876..486a641 100644
--- a/Diagram.hs
+++ b/Diagram.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Diagram (t,
                 dX,
                 dY,
diff --git a/Gtk.hs b/Gtk.hs
index ff73476..36dfe2f 100644
--- a/Gtk.hs
+++ b/Gtk.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Gtk (makeGUI) where
 
 import Control.Monad.IO.Class
diff --git a/Main.hs b/Main.hs
index 7e31710..58ab775 100644
--- a/Main.hs
+++ b/Main.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 import Gtk
 import System.Environment
 
diff --git a/Meshparser.hs b/Meshparser.hs
index 2c8b45e..3098109 100644
--- a/Meshparser.hs
+++ b/Meshparser.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Meshparser (VTable, meshToArr) where
 
 import Control.Applicative
diff --git a/Parser.hs b/Parser.hs
index d783c13..cf44139 100644
--- a/Parser.hs
+++ b/Parser.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Parser (Parser,
                runParser,
                satisfy,
diff --git a/Util.hs b/Util.hs
index 5065d73..92fa031 100644
--- a/Util.hs
+++ b/Util.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS_HADDOCK ignore-exports #-}
+
 module Util where