diff options
| author | Gregor Kleen <aethoago@141.li> | 2017-02-21 22:31:37 +0100 |
|---|---|---|
| committer | Gregor Kleen <aethoago@141.li> | 2017-02-21 22:31:37 +0100 |
| commit | 347a2aa26ccefa5a543ba9dba75ac1aba1ed1497 (patch) | |
| tree | 6bcc560c84d82182f0d223140dd558050b3522d4 | |
| parent | 0769cc7c46f4aeb3dd1416a62c0d68648ae5f782 (diff) | |
| download | postdelay-347a2aa26ccefa5a543ba9dba75ac1aba1ed1497.tar postdelay-347a2aa26ccefa5a543ba9dba75ac1aba1ed1497.tar.gz postdelay-347a2aa26ccefa5a543ba9dba75ac1aba1ed1497.tar.bz2 postdelay-347a2aa26ccefa5a543ba9dba75ac1aba1ed1497.tar.xz postdelay-347a2aa26ccefa5a543ba9dba75ac1aba1ed1497.zip | |
Fix definition of month
| -rw-r--r-- | lib/Postdelay/TimeSpec/Units.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Postdelay/TimeSpec/Units.hs b/lib/Postdelay/TimeSpec/Units.hs index 4874ce9..5e4b8ba 100644 --- a/lib/Postdelay/TimeSpec/Units.hs +++ b/lib/Postdelay/TimeSpec/Units.hs | |||
| @@ -39,7 +39,7 @@ import Text.Megaparsec | |||
| 39 | 39 | ||
| 40 | declareDerivedUnit "Day" [t| Hour |] 24 Nothing | 40 | declareDerivedUnit "Day" [t| Hour |] 24 Nothing |
| 41 | declareDerivedUnit "Week" [t| Day |] 7 Nothing | 41 | declareDerivedUnit "Week" [t| Day |] 7 Nothing |
| 42 | declareDerivedUnit "Month" [t| Day |] 30 Nothing | 42 | declareDerivedUnit "Month" [t| Day |] 30.44 Nothing |
| 43 | declareDerivedUnit "Year" [t| Day |] 365.25 Nothing | 43 | declareDerivedUnit "Year" [t| Day |] 365.25 Nothing |
| 44 | 44 | ||
| 45 | type Time = MkQu_DLN D.Time DefaultLCSU Fixed.Pico | 45 | type Time = MkQu_DLN D.Time DefaultLCSU Fixed.Pico |