100 lines
1.6 KiB
Elm
100 lines
1.6 KiB
Elm
module Models exposing (..)
|
|
|
|
import Date exposing (Date, now)
|
|
|
|
|
|
type Route
|
|
= OverviewRoute
|
|
| DayRoute String
|
|
| EventRoute EventSlug
|
|
| NotFoundRoute
|
|
|
|
|
|
type alias Model =
|
|
{ days : List Day
|
|
, eventInstances : List EventInstance
|
|
, eventLocations : List EventLocation
|
|
, eventTypes : List EventType
|
|
, events : List Event
|
|
, flags : Flags
|
|
, activeDay : Maybe Day
|
|
, filter : Filter
|
|
, route : Route
|
|
}
|
|
|
|
|
|
type alias Filter =
|
|
{ eventTypes : List EventType
|
|
, eventLocations : List EventLocation
|
|
}
|
|
|
|
|
|
type alias Day =
|
|
{ day_name : String
|
|
, date : Date
|
|
, repr : String
|
|
}
|
|
|
|
|
|
type alias Speaker =
|
|
{ name : String
|
|
}
|
|
|
|
|
|
type alias EventSlug =
|
|
String
|
|
|
|
|
|
type alias EventInstanceSlug =
|
|
String
|
|
|
|
|
|
type alias EventInstance =
|
|
{ title : String
|
|
, slug : EventInstanceSlug
|
|
, id : Int
|
|
, url : String
|
|
, eventSlug : EventSlug
|
|
, eventType : String
|
|
, backgroundColor : String
|
|
, forgroundColor : String
|
|
, from : Date
|
|
, to : Date
|
|
, timeslots : Float
|
|
, location : String
|
|
, locationIcon : String
|
|
, videoRecording : Bool
|
|
, videoUrl : String
|
|
}
|
|
|
|
|
|
type alias Event =
|
|
{ title : String
|
|
, slug : EventSlug
|
|
, abstract : String
|
|
, speakers : List Speaker
|
|
}
|
|
|
|
|
|
type alias EventLocation =
|
|
{ name : String
|
|
, slug : String
|
|
, icon : String
|
|
}
|
|
|
|
|
|
type alias EventType =
|
|
{ name : String
|
|
, slug : String
|
|
, color : String
|
|
, lightText : Bool
|
|
}
|
|
|
|
|
|
type alias Flags =
|
|
{ schedule_timeslot_length_minutes : Int
|
|
, schedule_midnight_offset_hours : Int
|
|
, ics_button_href : String
|
|
, camp_slug : String
|
|
}
|