アヤチノオト

覚書のこと

YesodのfileAFormReqでinput要素にrequired属性ついてない

わりとタイトルのまんまです。

uploadForm = renderDivs $ fileAFormReq "file"

と書いて生成されるhtmlが

<div class="required ">
<label for="hident2">file</label>
<input id="hident2" type="file" name="f1"><!-- required属性がない! -->
</div>
<input type="submit" value="Upload">

これは困った!
areqを使いましょう。

uploadForm = renderDivs $ areq fileField "file" Nothing
<div class="required ">
<label for="hident2">file</label>
<input id="hident2" type="file" required="" name="f1"><!-- required属性ある! -->
</div>
<input type="submit" value="Upload">

fileAFormReqのほうは古いapiなのでしょうか。