diff --git a/src/Laskutin/CSV.hs b/src/Laskutin/CSV.hs
index d968f90..d807bab 100644
--- a/src/Laskutin/CSV.hs
+++ b/src/Laskutin/CSV.hs
@@ -1,6 +1,7 @@
-{-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE DisambiguateRecordFields #-}
 {-# LANGUAGE DuplicateRecordFields #-}
+{-# LANGUAGE NamedFieldPuns #-}
+{-# LANGUAGE OverloadedStrings #-}
 
 module Laskutin.CSV (CsvInvoice(..), CsvTransaction(..), TransactionMessage(..), csvInvoiceSum, csvInvoiceRowSum, csvIsPaid, parseCsvFile, invoiceRowFromCsv) where
 
diff --git a/src/Laskutin/Email.hs b/src/Laskutin/Email.hs
index 09782b7..9d9fcaf 100644
--- a/src/Laskutin/Email.hs
+++ b/src/Laskutin/Email.hs
@@ -1,4 +1,6 @@
+{-# LANGUAGE NamedFieldPuns #-}
 {-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE TupleSections #-}
 
 module Laskutin.Email where
 
diff --git a/src/Laskutin/Status.hs b/src/Laskutin/Status.hs
index b8849e8..d6e2f8f 100644
--- a/src/Laskutin/Status.hs
+++ b/src/Laskutin/Status.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE NamedFieldPuns #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE RecordWildCards #-}