avoid displicate of year range
This commit is contained in:
parent
dab9687184
commit
63c79dceef
1 changed files with 1 additions and 1 deletions
|
@ -24,7 +24,7 @@ instance Author (a -> a) where
|
|||
authorJoeyHess = id
|
||||
{-# INLINE authorJoeyHess #-}
|
||||
authorJoeyHessCopyright year f
|
||||
| year >= 2010 = f
|
||||
| authorJoeyHessCopyright year = f
|
||||
| otherwise = authorJoeyHessCopyright (pred year) f
|
||||
{-# INLINE authorJoeyHessCopyright #-}
|
||||
|
||||
|
|
Loading…
Reference in a new issue