Fewer newlines

src/Handler/Utils/Form.hs

@@ -256,6 +256,7 @@ zipFileField doUnpack = Field{..}
       | otherwise    = return . Left $ SomeMessage MsgOnlyUploadOneFile
     fieldView fieldId fieldName attrs _ req = do
       [whamlet|
+        $newline never
         <input type=file ##{fieldId} *{attrs} name=#{fieldName} :req:required>
       |]