module Xmobar.Plugins.Monitors.Uptime.Linux (readUptime) where
import qualified Data.ByteString.Lazy.Char8 as B
readUptime :: IO Float
readUptime :: IO Float
readUptime =
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
fmap (forall a. Read a => String -> a
read forall b c a. (b -> c) -> (a -> b) -> a -> c
. ByteString -> String
B.unpack forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. [a] -> a
head forall b c a. (b -> c) -> (a -> b) -> a -> c
. ByteString -> [ByteString]
B.words) (String -> IO ByteString
B.readFile String
"/proc/uptime")