[commit: packages/time] master, wip/travis: Added missing example for showWeekDate. (147381b)
git at git.haskell.org
git at git.haskell.org
Sat May 7 06:43:54 UTC 2016
Repository : ssh://git@git.haskell.org/time
On branches: master,wip/travis
Link : http://git.haskell.org/packages/time.git/commitdiff/147381b33918537d64e9df200ed20ddac993d012
>---------------------------------------------------------------
commit 147381b33918537d64e9df200ed20ddac993d012
Author: bjorn <bjorn at bringert.net>
Date: Wed Nov 15 14:07:39 2006 -0800
Added missing example for showWeekDate.
The showWeekDate haddock comment was:
"show in ISO 8601 Week Date format as yyyy-Www-dd (e.g."
darcs-hash:20061115220739-6cdb2-5f577de58f061136b82cffa9c22c73b2e914bbed
>---------------------------------------------------------------
147381b33918537d64e9df200ed20ddac993d012
Data/Time/Calendar/WeekDate.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/Data/Time/Calendar/WeekDate.hs b/Data/Time/Calendar/WeekDate.hs
index a186ca9..0568a32 100644
--- a/Data/Time/Calendar/WeekDate.hs
+++ b/Data/Time/Calendar/WeekDate.hs
@@ -35,7 +35,7 @@ fromWeekDate y w d = ModifiedJulianDay (k - (mod k 7) + (toInteger (((clip 1 (if
(_,53,_) -> True
_ -> False
--- | show in ISO 8601 Week Date format as yyyy-Www-dd (e.g.
+-- | show in ISO 8601 Week Date format as yyyy-Www-dd (e.g. \"2006-W46-3\").
showWeekDate :: Day -> String
showWeekDate date = (show4 y) ++ "-W" ++ (show2 w) ++ "-" ++ (show d) where
(y,w,d) = toWeekDate date
More information about the ghc-commits
mailing list