css stuff

This commit is contained in:
nek0 2015-04-12 18:01:26 +02:00
parent b89ed118ca
commit 93f16d92d0
2 changed files with 4 additions and 3 deletions

View File

@ -50,7 +50,7 @@ currencyField = Field
Right (a, "") -> Right $ floor $ 100 * a
_ -> Left $ MsgInvalidNumber rawVals
, fieldView = \theId name attr val req -> toWidget [hamlet|$newline never
<input id='{theId} name=#{name} *{attr} type="number" step=0.01 min=0 :req:required="" value=#{showVal val}>
<input id=#{theId} name=#{name} *{attr} type="number" step=0.01 min=0 :req:required="" value=#{showVal val}>
|]
, fieldEnctype = UrlEncoded
}
@ -65,7 +65,7 @@ amountField = Field
Right (a, "") -> Right a
_ -> Left $ MsgInvalidInteger s
, fieldView = \theId name attr val req -> toWidget [hamlet|$newline never
<input id=#{theId} name="#{name}" *{attr} type="number" step=1 min=0 :req:required="" value="#{showVal val}">
<input id=#{theId} name=#{name} *{attr} type="number" step=1 min=0 :req:required="" value="#{showVal val}">
|]
, fieldEnctype = UrlEncoded
}

View File

@ -154,8 +154,9 @@ h1 {
-moz-animation-timing-function: linear;
}
input[type="submit"] {
input[type] {
width: auto;
min-width: 5em;
height: 5em;
}