move Graphics.* & co. to lib

1 files changed, 0 insertions, 39 deletions

diff --git a/src/Graphics/X11/Xlib/Atom/Extra.hs b/src/Graphics/X11/Xlib/Atom/Extra.hs
deleted file mode 100644
index 8442c48..0000000
--- a/src/Graphics/X11/Xlib/Atom/Extra.hs
+++ /dev/null
@@ -1,39 +0,0 @@
-module Graphics.X11.Xlib.Atom.Extra where
-
-import Graphics.X11.Types (Atom)
-import Graphics.X11.Xlib.Atom (internAtom)
-import Graphics.X11.Xlib.Display.Extra (withDefaultDisplay)
-import System.IO.Unsafe (unsafePerformIO)
-
-
-unsafeInternAtom :: String -> Bool -> Atom
-unsafeInternAtom atomName onlyIfExists =
-  unsafePerformIO $ withDefaultDisplay $ \display ->
-    internAtom display atomName onlyIfExists
-
-_NET_ACTIVE_WINDOW :: Atom
-_NET_ACTIVE_WINDOW = unsafeInternAtom "_NET_ACTIVE_WINDOW" True
-
-_NET_CLIENT_LIST :: Atom
-_NET_CLIENT_LIST = unsafeInternAtom "_NET_CLIENT_LIST" True
-
-_NET_CURRENT_DESKTOP :: Atom
-_NET_CURRENT_DESKTOP = unsafeInternAtom "_NET_CURRENT_DESKTOP" True
-
-_NET_DESKTOP_NAMES :: Atom
-_NET_DESKTOP_NAMES = unsafeInternAtom "_NET_DESKTOP_NAMES" True
-
-_NET_WM_DESKTOP :: Atom
-_NET_WM_DESKTOP = unsafeInternAtom "_NET_WM_DESKTOP" True
-
-_NET_WM_NAME :: Atom
-_NET_WM_NAME = unsafeInternAtom "_NET_WM_NAME" True
-
-_WIN_WORKSPACE :: Atom
-_WIN_WORKSPACE = unsafeInternAtom "_WIN_WORKSPACE" True
-
-_WIN_WORKSPACE_NAMES :: Atom
-_WIN_WORKSPACE_NAMES = unsafeInternAtom "_WIN_WORKSPACE_NAMES" True
-
-_WM_NAME :: Atom
-_WM_NAME = unsafeInternAtom "WM_NAME" True