@@ -1612,28 +1612,28 @@ applyLabel attrs label input =
16121612 Internal.element
16131613 Internal.asColumn
16141614 (Internal.NodeName "label")
1615− attrs
1615+ (Internal.htmlClass classes.inputLabel :: attrs)
16161616 (Internal.Unkeyed [ labelElement, input ])
16171617
16181618 Below ->
16191619 Internal.element
16201620 Internal.asColumn
16211621 (Internal.NodeName "label")
1622− attrs
1622+ (Internal.htmlClass classes.inputLabel :: attrs)
16231623 (Internal.Unkeyed [ input, labelElement ])
16241624
16251625 OnRight ->
16261626 Internal.element
16271627 Internal.asRow
16281628 (Internal.NodeName "label")
1629− attrs
1629+ (Internal.htmlClass classes.inputLabel :: attrs)
16301630 (Internal.Unkeyed [ input, labelElement ])
16311631
16321632 OnLeft ->
16331633 Internal.element
16341634 Internal.asRow
16351635 (Internal.NodeName "label")
1636− attrs
1636+ (Internal.htmlClass classes.inputLabel :: attrs)
16371637 (Internal.Unkeyed [ labelElement, input ])
16381638
16391639