diff options
author | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-07-12 19:09:05 +0200 |
---|---|---|
committer | Matthias Schiffer <mschiffer@universe-factory.net> | 2011-07-12 19:09:05 +0200 |
commit | 982bcffcfeb074b4c1beff64ca7361a9a66ed273 (patch) | |
tree | 176299794f94b55ed0d8c7b83ed2c54ef468b129 /lib/Phi/X11/AtomList.hs | |
parent | 19378fdcf11af2ef78d1b7e6cbda06952bb4e692 (diff) | |
download | phi-982bcffcfeb074b4c1beff64ca7361a9a66ed273.tar phi-982bcffcfeb074b4c1beff64ca7361a9a66ed273.zip |
Preload atoms using template haskell
Diffstat (limited to 'lib/Phi/X11/AtomList.hs')
-rw-r--r-- | lib/Phi/X11/AtomList.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lib/Phi/X11/AtomList.hs b/lib/Phi/X11/AtomList.hs new file mode 100644 index 0000000..60cd0c5 --- /dev/null +++ b/lib/Phi/X11/AtomList.hs @@ -0,0 +1,18 @@ +module Phi.X11.AtomList ( atoms + ) where + +atoms = [ "_XROOTPMAP_ID" + , "_XROOTMAP_ID" + , "_NET_WM_WINDOW_TYPE" + , "_NET_WM_WINDOW_TYPE_DOCK" + , "_NET_WM_DESKTOP" + , "_NET_WM_STATE" + , "_NET_WM_STATE_SKIP_PAGER" + , "_NET_WM_STATE_SKIP_TASKBAR" + , "_NET_WM_STATE_STICKY" + , "_NET_WM_STATE_BELOW" + , "_MOTIF_WM_HINTS" + , "_NET_WM_STRUT" + , "_NET_WM_STRUT_PARTIAL" + ] + |