moduleDingo.Callback(CallbackM,addWidget,sendJavascript,setWidgetContents)whereimportData.Text(Text)importDingo.Internal.Base(Command(..))importDingo.Internal.Callback(CallbackM,addCommand,addWidget)importDingo.Widget(Widget(..))importText.Blaze(Html)importText.Julius(JavascriptUrl)-- | Set the widget contents to the given HTML element.setWidgetContents::Widgetws=>w->Html->CallbackM()setWidgetContentswh=addCommand$ReplaceWidgetChildren(getWidgetIdw)h-- | Send raw Javascript to the browser.sendJavascript::JavascriptUrlText->CallbackM()sendJavascript=addCommand.RawJavascript