From be8064767c77a02987f9eae7392f5d479ce9d5be Mon Sep 17 00:00:00 2001
From: Spencer Janssen <spencerjanssen@gmail.com>
Date: Wed, 23 Dec 2009 07:45:58 +0100
Subject: Update all uses of forkProcess to xfork

Ignore-this: 963a4ddf1d2f4096bbb8969b173cd0c1

darcs-hash:20091223064558-25a6b-b8cdfb14005aa9b60d9cbac7b257a6fc22b8eac4.gz
---
 XMonad/Util/Timer.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'XMonad/Util/Timer.hs')

diff --git a/XMonad/Util/Timer.hs b/XMonad/Util/Timer.hs
index b5b6f6b..259c1ed 100644
--- a/XMonad/Util/Timer.hs
+++ b/XMonad/Util/Timer.hs
@@ -23,7 +23,6 @@ import XMonad
 import Control.Applicative
 import Control.Concurrent
 import Data.Unique
-import System.Posix.Process (forkProcess)
 
 -- $usage
 -- This module can be used to setup a timer to handle deferred events.
@@ -36,7 +35,7 @@ type TimerId = Int
 startTimer :: Rational -> X TimerId
 startTimer s = io $ do
   u   <- hashUnique <$> newUnique
-  forkProcess $ do
+  xfork $ do
     d   <- openDisplay ""
     rw  <- rootWindow d $ defaultScreen d
     threadDelay (fromEnum $ s * 1000000)
-- 
cgit v1.2.3