(defn
ensure-container
[]
(let
[cont-id
"figwheel-heads-up-container"
content-id
"figwheel-heads-up-content-area"]
(if-not
(.querySelector js/document (str "#" cont-id))
(let
[el
(node
:div
{:id cont-id,
:style
(str
"-webkit-transition: all 0.2s ease-in-out;"
"-moz-transition: all 0.2s ease-in-out;"
"-o-transition: all 0.2s ease-in-out;"
"transition: all 0.2s ease-in-out;"
"font-size: 13px;"
"border-top: 1px solid #f5f5f5;"
"box-shadow: 0px 0px 1px #aaaaaa;"
"line-height: 18px;"
"color: #333;"
"font-family: monospace;"
"padding: 0px 10px 0px 70px;"
"position: fixed;"
"bottom: 0px;"
"left: 0px;"
"height: 0px;"
"opacity: 0.0;"
"box-sizing: border-box;"
"z-index: 10000;"
"text-align: left;")})]
(set! (.-onclick el) heads-up-onclick-handler)
(set! (.-innerHTML el) cljs-logo-svg)
(.appendChild el (node :div {:id content-id}))
(-> (.-body js/document) (.appendChild el))))
{:container-el (.getElementById js/document cont-id),
:content-area-el (.getElementById js/document content-id)}))