From 070cab23829a45aa786f7d765a937cc003468f6b Mon Sep 17 00:00:00 2001
From: Jose A Ortega Ruiz <jao@gnu.org>
Date: Tue, 23 Mar 2010 21:23:10 +0100
Subject: Missing build-depends

Ignore-this: 463a4b021313f6d85ceb8dd3d35c122d

darcs-hash:20100323202310-748be-d6b5393a691e2c8c3368c01aa09f1f9b153c0d23.gz
---
 Plugins/Monitors/Disk.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Plugins/Monitors/Disk.hs')

diff --git a/Plugins/Monitors/Disk.hs b/Plugins/Monitors/Disk.hs
index 4cbe692..f3a7a2a 100644
--- a/Plugins/Monitors/Disk.hs
+++ b/Plugins/Monitors/Disk.hs
@@ -54,7 +54,7 @@ diskData = do
 
 mountedData :: [DevName] -> IO [(DevName, [Float])]
 mountedData devs = do
-  (dt, dt') <- doActionTwiceWithDelay 950000 diskData
+  (dt, dt') <- doActionTwiceWithDelay 750000 diskData
   return $ map (parseDev (zipWith diff dt' dt)) devs
   where diff (dev, xs) (_, ys) = (dev, zipWith (-) xs ys)
 
-- 
cgit v1.2.3