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(