diff --git a/src/Quasar/Wayland/Client.hs b/src/Quasar/Wayland/Client.hs
index b08759c7bc0ba3c3c23310156236e284d6068818..0d1f360ec52f8713c2fa7c5c31d952057a2de1d8 100644
--- a/src/Quasar/Wayland/Client.hs
+++ b/src/Quasar/Wayland/Client.hs
@@ -31,7 +31,11 @@ instance IsDisposable WaylandClient where
   toDisposable (WaylandClient connection) = toDisposable connection
 
 newWaylandClient :: MonadResourceManager m => Socket -> m WaylandClient
-newWaylandClient socket = WaylandClient <$> newWaylandConnection @I_wl_display @I_wl_registry clientCallback clientCallback socket
+newWaylandClient socket = WaylandClient <$>
+  newWaylandConnection
+    (clientCallback @I_wl_display)
+    (clientCallback @I_wl_registry)
+    socket
 
 clientCallback :: IsInterfaceSide 'Client i => SimpleCallback 'Client STM i
 clientCallback = SimpleCallback {