diff --git a/Handler/Pinentry.hs b/Handler/Pinentry.hs
index 65e959e..49968f4 100644
--- a/Handler/Pinentry.hs
+++ b/Handler/Pinentry.hs
@@ -17,7 +17,7 @@ getPinentryR uId =
         defaultLayout $ do
           [whamlet|
             <h3>_{MsgEnterPin}
-            <form method="post" enctype=#{enctype}>
+            <form method="post" enctype=#{enctype} autofocus>
               ^{pinWidget}
             |]
       Nothing -> do