on master help sign in
Fix documentation in Rel8.Expr.Time
dec2074Shane O'Brien
src/Rel8/Expr/Time.hs+4−4
@@ -13,7 +13,7 @@ module Rel8.Expr.Time
13 , diffTime
13 , diffTime
14 , subtractTime
14 , subtractTime
15
15
16− -- Working with @DiffTime@
16+ -- * Working with @DiffTime@
17 , scaleInterval
17 , scaleInterval
18 , second, seconds
18 , second, seconds
19 , minute, minutes
19 , minute, minutes
@@ -97,7 +97,7 @@ second :: Expr DiffTime
97second = singleton "second"
97second = singleton "second"
98
98
99
99
100−-- | Create a literal interval from an integral number of seconds.
100+-- | Create a literal interval from a number of seconds.
101seconds :: Expr Double -> Expr DiffTime
101seconds :: Expr Double -> Expr DiffTime
102seconds = (`scaleInterval` second)
102seconds = (`scaleInterval` second)
103
103
@@ -107,7 +107,7 @@ minute :: Expr DiffTime
107minute = singleton "minute"
107minute = singleton "minute"
108
108
109
109
110−-- | Create a literal interval from an integral number of minutes.
110+-- | Create a literal interval from a number of minutes.
111minutes :: Expr Double -> Expr DiffTime
111minutes :: Expr Double -> Expr DiffTime
112minutes = (`scaleInterval` minute)
112minutes = (`scaleInterval` minute)
113
113
@@ -117,7 +117,7 @@ hour :: Expr DiffTime
117hour = singleton "hour"
117hour = singleton "hour"
118
118
119
119
120−-- | Create a literal interval from an integral number of hours.
120+-- | Create a literal interval from a number of hours.
121hours :: Expr Double -> Expr DiffTime
121hours :: Expr Double -> Expr DiffTime
122hours = (`scaleInterval` hour)
122hours = (`scaleInterval` hour)
123
123