git-svn-id: https://ssl.buetow.org/repos/hsbot/trunk@38 9f8f72e9-4bf4-416e-b76e-7d4203597157

1 files changed, 1 insertions, 1 deletions

diff --git a/Main.hs b/Main.hs
index 7726f70..1d668d3 100644
--- a/Main.hs
+++ b/Main.hs
@@ -15,7 +15,7 @@ main = do
    databaseFile <- get "databaseFile" conf
    let state = stateLoad databaseFile
    state' <- state -- Extract State from the IO Monad 
-   ircConnect (DispatchEnv state' conf dispatch)
+   ircStart (DispatchEnv state' conf dispatch)
 
 -- Shortcut
 r :: IO ()