diff --git a/GLFW-b.cabal b/GLFW-b.cabal
--- a/GLFW-b.cabal
+++ b/GLFW-b.cabal
@@ -1,5 +1,5 @@
 name:         GLFW-b
-version:      3.3.9.0
+version:      3.3.9.1
 category:     Graphics
 
 author:       Brian Lewis <brian@lorf.org>
@@ -54,7 +54,7 @@
       base          <  5
     , deepseq       >= 1.1.0.0
     , array         >= 0.5.3.0
-    , bindings-GLFW >= 3.3.9.1
+    , bindings-GLFW >= 3.3.9.2
 
 --------------------------------------------------------------------------------
 
@@ -78,7 +78,7 @@
     , HUnit                >= 1.3 && < 1.7
     , base                 <  5
     , array                >= 0.5.3.0
-    , bindings-GLFW        >= 3.3.9.1
+    , bindings-GLFW        >= 3.3.9.2
     , deepseq              >= 1.1.0.0
     , test-framework       == 0.8.*
     , test-framework-hunit == 0.3.*
diff --git a/Graphics/UI/GLFW.hs b/Graphics/UI/GLFW.hs
--- a/Graphics/UI/GLFW.hs
+++ b/Graphics/UI/GLFW.hs
@@ -1901,8 +1901,8 @@
 getNSGLContext = c'glfwGetNSGLContext . toC
 
 -- | See <http://www.glfw.org/docs/3.3/group__native.html#ga8519b66594ea3ef6eeafaa2e3ee37406 glfwGetX11Display>
-getX11Display :: Window -> IO (Ptr display)
-getX11Display = c'glfwGetX11Display . toC
+getX11Display :: IO (Ptr display)
+getX11Display = c'glfwGetX11Display
 
 -- | See <http://www.glfw.org/docs/3.3/group__native.html#ga088fbfa80f50569402b41be71ad66e40 glfwGetX11Adapter>
 getX11Adapter :: Window -> IO Word64
