onasty/web/src/ExpirationOptions.elm(view raw)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
module ExpirationOptions exposing (ExpiresAt, expirationOptions)
type alias ExpiresAt =
{ text : String, value : Int }
expirationOptions : List ExpiresAt
expirationOptions =
[ { text = "Never expires (default)", value = 0 }
, { text = "1 hour", value = 60 * 60 * 1000 }
, { text = "12 hours", value = 12 * 60 * 60 * 1000 }
, { text = "1 day", value = 24 * 60 * 60 * 1000 }
, { text = "3 days", value = 3 * 24 * 60 * 60 * 1000 }
, { text = "7 days", value = 7 * 24 * 60 * 60 * 1000 }
]
|