diff --git a/hog.cabal b/hog.cabal
--- a/hog.cabal
+++ b/hog.cabal
@@ -1,5 +1,5 @@
 Name:                hog
-Version:             0.1
+Version:             0.1.1
 Synopsis:            Simple IRC logger bot.
 Description:         Simple IRC logger bot, connects to given channels and
                      logs lines to files of the corresponding channel names.
@@ -14,6 +14,7 @@
 
 Executable hog
   Main-is:           Main.hs
+  Other-Modules:     Control.Concurrent.Delay
   Hs-source-dirs:    src
   Build-depends:     base >4 && <5,
                      unix >= 2.4 && <2.5,
diff --git a/src/Control/Concurrent/Delay.hs b/src/Control/Concurrent/Delay.hs
new file mode 100644
--- /dev/null
+++ b/src/Control/Concurrent/Delay.hs
@@ -0,0 +1,10 @@
+module Control.Concurrent.Delay where
+
+import Control.Concurrent
+
+delaySeconds :: Integer -> IO ()
+delaySeconds 0 = return ()
+delaySeconds n = do threadDelay (1000 * 1000); delaySeconds (n-1)
+
+delayMinutes :: Integer -> IO ()
+delayMinutes = delaySeconds . (*60)