diff options
| author | Daniel Gnoutcheff <gnoutchd@softwarefreedom.org> | 2017-01-19 19:09:48 -0500 |
|---|---|---|
| committer | Daniel Gnoutcheff <gnoutchd@softwarefreedom.org> | 2017-01-19 19:09:48 -0500 |
| commit | 23c8bf6597ae833bf4ff61025edcb20fbe1f595d (patch) | |
| tree | 7df947591159bc290ed497b060a8e7c0755abfa9 /Handler/Employment.hs | |
| parent | 18212a5c21d14e19c6176fd6d3630f088902ec42 (diff) | |
- Allow changing/disabling anniversary PTO rollover caps per-employment.
(We want to let mishi accumulated unlimited vacation time.)
- Round all amounts to two decimal places. (Requested by tanisha.)
Diffstat (limited to 'Handler/Employment.hs')
| -rw-r--r-- | Handler/Employment.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Handler/Employment.hs b/Handler/Employment.hs index 55057a9..a69b67a 100644 --- a/Handler/Employment.hs +++ b/Handler/Employment.hs @@ -37,6 +37,7 @@ employmentAForm tc = Employment <*> areq (jqueryDayField def) "Start date" (Just (employmentStartDate tc)) <*> aopt (jqueryDayField def) "End date" (Just (employmentEndDate tc)) <*> areq doubleField "Commitment" (Just (employmentCommitment tc)) + <*> aopt doubleField "Custom anniversary max (0 = infinite)" (Just (employmentPtoMaxRollover tc)) employmentForm :: Employment -> Html -> MForm Handler (FormResult Employment, Widget) employmentForm tc h = renderDivs (employmentAForm tc) h |