From 896931339ac254c2bbfa0e2d0b780ad918a57b34 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Sun, 16 Aug 2026 10:54:15 +0200 Subject: Helpers for server storage watchers --- src/Erebos/DirectMessage.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Erebos/DirectMessage.hs') diff --git a/src/Erebos/DirectMessage.hs b/src/Erebos/DirectMessage.hs index 6eb8a8c..6697d53 100644 --- a/src/Erebos/DirectMessage.hs +++ b/src/Erebos/DirectMessage.hs @@ -152,8 +152,8 @@ instance Service DirectMessage where updateDirectMessagePeer . finalOwner =<< asks svcPeerIdentity serviceStorageWatchers _ = - [ SomeStorageWatcherHC lookupSharedValueHC syncDirectMessageToPeer - , GlobalStorageWatcherH lookupSharedValueH findMissingPeers + [ someStorageWatcherHC lookupSharedValueHC syncDirectMessageToPeer + , globalStorageWatcherH lookupSharedValueH findMissingPeers ] -- cgit v1.2.3