Add PremiumPromo PremiumLevel

This commit is contained in:
Casey Webb 2022-03-01 00:43:53 -06:00
parent 662dc66203
commit 39c82c2661
No known key found for this signature in database
GPG Key ID: 48642A5DE0C82442
2 changed files with 8 additions and 1 deletions

View File

@ -11,6 +11,7 @@ module Nri.Ui.Data.PremiumLevel exposing (PremiumLevel(..), allowedFor, highest,
type PremiumLevel type PremiumLevel
= Free = Free
| Premium | Premium
| PremiumPromo
| PremiumWithWriting | PremiumWithWriting
@ -44,9 +45,12 @@ order : PremiumLevel -> Int
order privileges = order privileges =
case privileges of case privileges of
PremiumWithWriting -> PremiumWithWriting ->
2 3
Premium -> Premium ->
2
PremiumPromo ->
1 1
Free -> Free ->

View File

@ -107,6 +107,9 @@ premium config =
PremiumLevel.Premium -> PremiumLevel.Premium ->
config.showPennant config.showPennant
PremiumLevel.PremiumPromo ->
config.showPennant
PremiumLevel.PremiumWithWriting -> PremiumLevel.PremiumWithWriting ->
config.showPennant config.showPennant