Elm case matching on complex records?

Application.elm

type alias Model =
  { errorMessage: Maybe String      -- This is what Rails would call a "flash": we just show it.
  , video: Maybe Video.Model        -- Information about a video and subtitles.
  , player: Maybe VideoPlayer.Model -- Player state: URL, playing/paused, time.
  }

type Action
  = VideoLoaded Video.Model
  | VideoPlayerAction VideoPlayer.Action

view : Signal.Address Action -> Model -> Html.Html
view address model =
  case model of
  
    -- If we have an error, show that.
    { errorMessage = Just err  } ->
      text err
      
    -- If we have a player, show that.
    { videoPlayer = Just player } ->
      VideoPlayer.view (Signal.forwardTo address VideoPlayerAction) player

    -- Otherwise, just show an error.
    _ -> 
      text "Loading..."