diff options
author | Jose A Ortega Ruiz <jao@gnu.org> | 2010-03-23 21:23:10 +0100 |
---|---|---|
committer | Jose A Ortega Ruiz <jao@gnu.org> | 2010-03-23 21:23:10 +0100 |
commit | 070cab23829a45aa786f7d765a937cc003468f6b (patch) | |
tree | 3ad37fac931f3366ef103c5e0c640462748cf47b | |
parent | 879f249e2a7ee7adbadf9f5d9e26d5339fc2458c (diff) | |
download | xmobar-070cab23829a45aa786f7d765a937cc003468f6b.tar.gz xmobar-070cab23829a45aa786f7d765a937cc003468f6b.tar.bz2 |
Missing build-depends
Ignore-this: 463a4b021313f6d85ceb8dd3d35c122d
darcs-hash:20100323202310-748be-d6b5393a691e2c8c3368c01aa09f1f9b153c0d23.gz
-rw-r--r-- | Plugins/Monitors/Disk.hs | 2 | ||||
-rw-r--r-- | xmobar.cabal | 2 |
2 files changed, 2 insertions, 2 deletions
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) diff --git a/xmobar.cabal b/xmobar.cabal index 4af6d3b..e4d0cb5 100644 --- a/xmobar.cabal +++ b/xmobar.cabal @@ -49,7 +49,7 @@ executable xmobar if impl (ghc >= 6.12.1) ghc-options: -fno-warn-unused-do-bind - build-depends: X11>=1.3.0, mtl, unix, parsec, filepath, stm + build-depends: X11>=1.3.0, mtl, unix, parsec, filepath, stm, time if flag(small_base) build-depends: base == 4.*, containers, process, old-time, old-locale, bytestring, directory |