git.iko.soy/denis
on master help sign in
Removed extra type
0771fc6iko
denis/src/Data/Channel/AnonymousChannel.hs+1−5
compare with master
unifiedsplit
@@ -1,4 +1,4 @@
1−{-# LANGUAGE
1+ {-# LANGUAGE
2 DataKinds ,
2 DataKinds ,
3 DeriveGeneric ,
3 DeriveGeneric ,
4 OverloadedLabels,
4 OverloadedLabels,
@@ -9,11 +9,9 @@
9 RecordWildCards #-}
9 RecordWildCards #-}
10
10
11module Data.Channel.AnonymousChannel (
11module Data.Channel.AnonymousChannel (
12− AnonymousChannelId,
13 AnonymousChannel(..)
12 AnonymousChannel(..)
14) where
13) where
15
14
16−import Data.Int (Int64)
17import qualified Generics.SOP as SOP
15import qualified Generics.SOP as SOP
18import qualified GHC.Generics as GHC
16import qualified GHC.Generics as GHC
19import Data.Aeson
17import Data.Aeson
@@ -36,8 +34,6 @@ instance HasValidatableText AnonymousChannel where
36
34
37-- MARK: Implementation
35-- MARK: Implementation
38
36
39−type AnonymousChannelId = Int64
40−
41data AnonymousChannel = AnonymousChannel {
37data AnonymousChannel = AnonymousChannel {
42 anonymousChannelTags :: V.Vector Text,
38 anonymousChannelTags :: V.Vector Text,
43 anonymousChannelPeopleIds :: [UserId]
39 anonymousChannelPeopleIds :: [UserId]