From f28825e471e206bcb7e6dc8e4874c2b771f7d24c Mon Sep 17 00:00:00 2001 From: tv Date: Tue, 7 Feb 2023 02:30:41 +0100 Subject: move Graphics.* & co. to lib --- src/Graphics/X11/Xlib/Extras/Extra.hs | 14 -------------- 1 file changed, 14 deletions(-) delete mode 100644 src/Graphics/X11/Xlib/Extras/Extra.hs (limited to 'src/Graphics/X11/Xlib/Extras/Extra.hs') diff --git a/src/Graphics/X11/Xlib/Extras/Extra.hs b/src/Graphics/X11/Xlib/Extras/Extra.hs deleted file mode 100644 index d88bf9d..0000000 --- a/src/Graphics/X11/Xlib/Extras/Extra.hs +++ /dev/null @@ -1,14 +0,0 @@ -module Graphics.X11.Xlib.Extras.Extra where - -import Data.Text (Text) -import Foreign.C.String.Extra (castCCharToWord8) -import qualified Data.ByteString as ByteString -import qualified Data.Text.Encoding.Extra as Text -import qualified Graphics.X11 as X11 -import qualified Graphics.X11.Xlib.Extras as X11 - - -getWindowPropertyText :: X11.Display -> X11.Atom -> X11.Window -> IO (Maybe Text) -getWindowPropertyText d a w = - fmap (Text.decodeUtf8Lenient . ByteString.pack . map castCCharToWord8) <$> - X11.getWindowProperty8 d a w -- cgit v1.2.3