jsObjectT :: JSFunction JSObject -> UI JSInit
jsObjectT f = do
  (r,e,h) <- onceRef
  runLater $ h =<< callFunction f
  b <- refB r e
  return $ JSInit b $ () <$ e
jsObjectT :: JSFunction JSObject -> UI JSInit
jsObjectT f = do
  (r,e,h) <- onceRef
  runLater $ h =<< callFunction f
  b <- refB r e
  return $ JSInit b $ () <$ e
jsObjectT f = do
  (r,e,h) <- onceRef
  runLater $ h =<< callFunction f
  b <- refB r e
  return $ JSInit b $ () <$ e