Support session$x lists

[rjake]

Ex. session$user, session$clientData$url_host_name should prompt:

session <-
  list(
    user = "",
    client = list(url_host_name = "")
  )

A bigger example

session <-
  list(
    a = 1,
    b = list(c = 1, d = 2),
    e = list(f = list(g = 1))
  )

styler::style_text(
  capture.output(dput(session)) %>%
    #str_replace_all("\\blist\\b", "\nlist") %>%
    str_replace_all(",", ",\n")
)