From f22cb801a3ae8284e147f5778c14565536cf72b6 Mon Sep 17 00:00:00 2001
From: Jens Nolte <git@queezle.net>
Date: Tue, 14 Sep 2021 21:28:11 +0200
Subject: [PATCH] Formating
---
src/Quasar/Wayland/Client.hs | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/src/Quasar/Wayland/Client.hs b/src/Quasar/Wayland/Client.hs
index b08759c..0d1f360 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 {
--
GitLab