@@ -1,4 +1,4 @@
1−{-# LANGUAGE
1+ {-# LANGUAGE
22 DataKinds ,
33 DeriveGeneric ,
44 OverloadedLabels,
@@ -9,11 +9,9 @@
99 RecordWildCards #-}
1010
1111module Data.Channel.AnonymousChannel (
12− AnonymousChannelId,
1312 AnonymousChannel(..)
1413) where
1514
16−import Data.Int (Int64)
1715import qualified Generics.SOP as SOP
1816import qualified GHC.Generics as GHC
1917import Data.Aeson
@@ -36,8 +34,6 @@ instance HasValidatableText AnonymousChannel where
3634
3735-- MARK: Implementation
3836
39−type AnonymousChannelId = Int64
40−
4137data AnonymousChannel = AnonymousChannel {
4238 anonymousChannelTags :: V.Vector Text,
4339 anonymousChannelPeopleIds :: [UserId]