From 785a5d63e8b7896be0379fba422d0076577d1084 Mon Sep 17 00:00:00 2001 From: Joris Date: Sat, 10 Oct 2015 12:04:52 +0200 Subject: Invert firstname and lastname in a birthdate --- src/Birthdate.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Birthdate.hs') diff --git a/src/Birthdate.hs b/src/Birthdate.hs index 4c6e398..c9d0bda 100644 --- a/src/Birthdate.hs +++ b/src/Birthdate.hs @@ -14,8 +14,8 @@ import Date (Date, sameDayAndMonth, yearsGap) data Birthdate = Birthdate { date :: Date - , lastname :: Text , firstname :: Text + , lastname :: Text } deriving (Eq, Show) fullname :: Birthdate -> Text -- cgit v1.2.3