typo

2018-10-10 18:13:50 +02:00 · 2018-10-10 18:13:50 +02:00 · 327e7d267a
parent 8d0d566697
commit 327e7d267a
1 changed files with 1 additions and 1 deletions
--- a/Handler/Pinentry.hs
+++ b/Handler/Pinentry.hs
@ -53,5 +53,5 @@ postPinentryR uId = do
    )

 pinentryForm :: AForm Handler Text
-pinentryForm = areq passwordField (withAtofocus $ bfs MsgPIN) Nothing
+pinentryForm = areq passwordField (withAutofocus $ bfs MsgPIN) Nothing
 <* bootstrapSubmit (msgToBSSubmit MsgSubmit)