Skip to content

Commit fcc0e50

Browse files
committed
renaming and changelog
1 parent 07a090f commit fcc0e50

File tree

2 files changed

+12
-11
lines changed

2 files changed

+12
-11
lines changed
Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
Type class for default team feature status

libs/wire-api/src/Wire/API/Team/Feature.hs

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -37,7 +37,7 @@ module Wire.API.Team.Feature
3737
LockStatus (..),
3838
LockStatusValue (..),
3939
IncludeLockStatus (..),
40-
TeamFeatureDefaults (..),
40+
DefTeamFeatureStatus (..),
4141

4242
-- * Swagger
4343
typeTeamFeatureName,
@@ -653,44 +653,44 @@ instance Cass.Cql LockStatusValue where
653653
----------------------------------------------------------------------
654654
-- defaults
655655

656-
class TeamFeatureDefaults (a :: TeamFeatureName) where
656+
class DefTeamFeatureStatus (a :: TeamFeatureName) where
657657
defTeamFeatureStatus :: TeamFeatureStatus 'WithLockStatus a
658658

659-
instance TeamFeatureDefaults 'TeamFeatureGuestLinks where
659+
instance DefTeamFeatureStatus 'TeamFeatureGuestLinks where
660660
defTeamFeatureStatus = TeamFeatureStatusNoConfigAndLockStatus TeamFeatureEnabled Unlocked
661661

662-
instance TeamFeatureDefaults 'TeamFeatureValidateSAMLEmails where
662+
instance DefTeamFeatureStatus 'TeamFeatureValidateSAMLEmails where
663663
defTeamFeatureStatus = TeamFeatureStatusNoConfig TeamFeatureEnabled
664664

665-
instance TeamFeatureDefaults 'TeamFeatureSndFactorPasswordChallenge where
665+
instance DefTeamFeatureStatus 'TeamFeatureSndFactorPasswordChallenge where
666666
defTeamFeatureStatus = TeamFeatureStatusNoConfigAndLockStatus TeamFeatureDisabled Locked
667667

668-
instance TeamFeatureDefaults 'TeamFeatureSearchVisibilityInbound where
668+
instance DefTeamFeatureStatus 'TeamFeatureSearchVisibilityInbound where
669669
defTeamFeatureStatus = TeamFeatureStatusNoConfig TeamFeatureDisabled
670670

671-
instance TeamFeatureDefaults 'TeamFeatureFileSharing where
671+
instance DefTeamFeatureStatus 'TeamFeatureFileSharing where
672672
defTeamFeatureStatus = TeamFeatureStatusNoConfigAndLockStatus TeamFeatureEnabled Unlocked
673673

674-
instance TeamFeatureDefaults 'TeamFeatureSelfDeletingMessages where
674+
instance DefTeamFeatureStatus 'TeamFeatureSelfDeletingMessages where
675675
defTeamFeatureStatus =
676676
TeamFeatureStatusWithConfigAndLockStatus
677677
TeamFeatureEnabled
678678
(TeamFeatureSelfDeletingMessagesConfig 0)
679679
Unlocked
680680

681-
instance TeamFeatureDefaults 'TeamFeatureClassifiedDomains where
681+
instance DefTeamFeatureStatus 'TeamFeatureClassifiedDomains where
682682
defTeamFeatureStatus =
683683
TeamFeatureStatusWithConfig
684684
TeamFeatureDisabled
685685
(TeamFeatureClassifiedDomainsConfig [])
686686

687-
instance TeamFeatureDefaults 'TeamFeatureAppLock where
687+
instance DefTeamFeatureStatus 'TeamFeatureAppLock where
688688
defTeamFeatureStatus =
689689
TeamFeatureStatusWithConfig
690690
TeamFeatureEnabled
691691
(TeamFeatureAppLockConfig (EnforceAppLock False) 60)
692692

693-
instance TeamFeatureDefaults 'TeamFeatureConferenceCalling where
693+
instance DefTeamFeatureStatus 'TeamFeatureConferenceCalling where
694694
defTeamFeatureStatus = TeamFeatureStatusNoConfig TeamFeatureEnabled
695695

696696
----------------------------------------------------------------------

0 commit comments

Comments
 (0)