diff --git a/src/GypsFulvus.hs b/src/GypsFulvus.hs index a3a96d7..e4143a1 100644 --- a/src/GypsFulvus.hs +++ b/src/GypsFulvus.hs @@ -1,4 +1,4 @@ -module GypsFulvus(execMain, Manhole, Sewage, InitStatus) where +module GypsFulvus(execMain, Manhole, Sewage, InitStatus(..)) where import Control.Concurrent.STM (atomically, retry) import Control.Concurrent.STM.TMVar import Control.Concurrent.STM.TChan diff --git a/src/GypsFulvus/PluginStuff.hs b/src/GypsFulvus/PluginStuff.hs index 61d7be5..bbdac3a 100644 --- a/src/GypsFulvus/PluginStuff.hs +++ b/src/GypsFulvus/PluginStuff.hs @@ -1,4 +1,4 @@ -module GypsFulvus.PluginStuff(loadCommsPlugins, Sewage, Manhole, InitStatus) where +module GypsFulvus.PluginStuff(loadCommsPlugins, Sewage, Manhole, InitStatus(..)) where import Control.Monad import System.Directory import System.Plugins.Make