19 lines
588 B
Plaintext
19 lines
588 B
Plaintext
$newline never
|
|
$# Wrapper for all kinds of forms
|
|
<form ##{formId} method=#{decodeUtf8 (renderStdMethod formMethod)} action=#{fromMaybe "" formActionUrl} enctype=#{formEncoding} *{formAttrs}>
|
|
$# Distinguish different falvours of submit button layouts here:
|
|
$case formSubmit
|
|
$of FormNoSubmit
|
|
^{formWidget}
|
|
$of FormSubmit
|
|
^{formWidget}
|
|
^{buttonView btn}
|
|
$of FormDualSubmit
|
|
^{buttonView btn}
|
|
^{formWidget}
|
|
^{buttonView btn}
|
|
$of FormAutoSubmit
|
|
^{formWidget}
|
|
<button type=submit uw-auto-submit-button>
|
|
^{btnLabel btn}
|