From fe48ecd3b1cc11f176c1080539b70abac956f0a0 Mon Sep 17 00:00:00 2001 From: tv Date: Tue, 7 Feb 2023 03:01:37 +0100 Subject: move EWMH-related stuff to Graphics.X11.EWMH --- lib/Graphics/X11/Xlib/Atom/Extra.hs | 18 ------------------ 1 file changed, 18 deletions(-) (limited to 'lib/Graphics/X11/Xlib/Atom/Extra.hs') diff --git a/lib/Graphics/X11/Xlib/Atom/Extra.hs b/lib/Graphics/X11/Xlib/Atom/Extra.hs index 8442c48..d96b54f 100644 --- a/lib/Graphics/X11/Xlib/Atom/Extra.hs +++ b/lib/Graphics/X11/Xlib/Atom/Extra.hs @@ -11,24 +11,6 @@ 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 -- cgit v1.2.3