diff --git a/public/index.html b/public/index.html index 88fcd75..49bbdce 100644 --- a/public/index.html +++ b/public/index.html @@ -5307,13 +5307,38 @@ var $author$project$Main$regions = _List_fromArray( _Utils_Tuple2('EW', 'West Europe, Amsterdam'), _Utils_Tuple2('EN', 'North Europe, Dublin') ]); +var $elm$html$Html$label = _VirtualDom_node('label'); +var $elm$virtual_dom$VirtualDom$style = _VirtualDom_style; +var $elm$html$Html$Attributes$style = $elm$virtual_dom$VirtualDom$style; +var $elm$virtual_dom$VirtualDom$text = _VirtualDom_text; +var $elm$html$Html$text = $elm$virtual_dom$VirtualDom$text; +var $author$project$Main$renderFormInput = F2( + function (alabel, ainput) { + return A2( + $elm$html$Html$div, + _List_Nil, + _List_fromArray( + [ + A2( + $elm$html$Html$label, + _List_fromArray( + [ + A2($elm$html$Html$Attributes$style, 'padding-right', '10px') + ]), + _List_fromArray( + [ + $elm$html$Html$text(alabel) + ])), + ainput, + $author$project$Main$br_, + $author$project$Main$br_ + ])); + }); var $elm$html$Html$option = _VirtualDom_node('option'); var $elm$core$Tuple$second = function (_v0) { var y = _v0.b; return y; }; -var $elm$virtual_dom$VirtualDom$text = _VirtualDom_text; -var $elm$html$Html$text = $elm$virtual_dom$VirtualDom$text; var $elm$json$Json$Encode$string = _Json_wrap; var $elm$html$Html$Attributes$stringProperty = F2( function (key, string) { @@ -5372,51 +5397,53 @@ var $author$project$Main$view = function (model) { $author$project$Main$br_, $author$project$Main$br_, $author$project$Main$br_, - $elm$html$Html$text('code'), A2( - $elm$html$Html$input, - _List_fromArray( - [ - $elm$html$Html$Events$onInput($author$project$Main$InputCode), - $elm$html$Html$Attributes$value(model.E) - ]), - _List_Nil), - $author$project$Main$br_, - $author$project$Main$br_, - $elm$html$Html$text('region'), - A2($author$project$Main$renderSelect, $author$project$Main$InputReg, $author$project$Main$regions), - $author$project$Main$br_, - $author$project$Main$br_, - $elm$html$Html$text('environment'), - A2($author$project$Main$renderSelect, $author$project$Main$InputEnv, $author$project$Main$envs), - $author$project$Main$br_, - $author$project$Main$br_, - $elm$html$Html$text('role'), - A2($author$project$Main$renderSelect, $author$project$Main$InputRole, $author$project$Main$roles), - $author$project$Main$br_, - $author$project$Main$br_, - $elm$html$Html$text('increment'), + $author$project$Main$renderFormInput, + 'code', A2( - $elm$html$Html$select, - _List_fromArray( - [ - $elm$html$Html$Events$onInput($author$project$Main$InputIncr) - ]), + $elm$html$Html$input, + _List_fromArray( + [ + $elm$html$Html$Events$onInput($author$project$Main$InputCode), + $elm$html$Html$Attributes$value(model.E) + ]), + _List_Nil)), A2( - $elm$core$List$map, + $author$project$Main$renderFormInput, + 'region', + A2($author$project$Main$renderSelect, $author$project$Main$InputReg, $author$project$Main$regions)), + A2( + $author$project$Main$renderFormInput, + 'environment', + A2($author$project$Main$renderSelect, $author$project$Main$InputEnv, $author$project$Main$envs)), + A2( + $author$project$Main$renderFormInput, + 'role', + A2($author$project$Main$renderSelect, $author$project$Main$InputRole, $author$project$Main$roles)), + A2( + $author$project$Main$renderFormInput, + 'increment', + A2( + $elm$html$Html$select, + _List_fromArray( + [ + $elm$html$Html$Events$onInput($author$project$Main$InputIncr) + ]), A2( - $elm$core$Basics$composeR, - $elm$core$String$fromInt, + $elm$core$List$map, A2( $elm$core$Basics$composeR, - function (s) { - return _Utils_Tuple2(s, s); - }, - $author$project$Main$renderOption)), - _Utils_ap( - A2($elm$core$List$range, 1, 20), - _List_fromArray( - [0])))) + $elm$core$String$fromInt, + A2( + $elm$core$Basics$composeR, + function (s) { + return _Utils_Tuple2(s, s); + }, + $author$project$Main$renderOption)), + _Utils_ap( + A2($elm$core$List$range, 1, 20), + _List_fromArray( + [0]))))) ])); }; var $author$project$Main$main = $elm$browser$Browser$sandbox(