diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2015-04-05 13:42:04 +0900 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2015-04-05 13:42:04 +0900 |
| commit | 87e15e8f3d6b687bc256712b5f5cbcd2bb3bcd75 (patch) | |
| tree | dc545991d626576750e815b9cc7a84a198541102 /src | |
| parent | 330a4f9562f9e71ebf680451b8ed78790b103f30 (diff) | |
| download | srem-idleuser.tar.gz | |
start trying to detect idle user under X11idleuser
Can't make it build yet
Diffstat (limited to 'src')
| -rw-r--r-- | src/Utility/IdleUser/X11.hs | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/Utility/IdleUser/X11.hs b/src/Utility/IdleUser/X11.hs new file mode 100644 index 0000000..acdeb9e --- /dev/null +++ b/src/Utility/IdleUser/X11.hs @@ -0,0 +1,12 @@ +{-# LANGUAGE ForeignFunctionInterface #-} + +module Utility.IdleUser.X11 (userIdleTime) where + +import Foreign +import Foreign.C.Types + +foreign import ccall unsafe "GetXIdleTime" + getXIdleTime :: CUInt + +userIdleTime :: Int +userIdleTime = undefined |