Update category according to payment in add overlay

1 files changed, 1 insertions, 2 deletions

diff --git a/server/src/Persistence/PaymentCategory.hs b/server/src/Persistence/PaymentCategory.hs
index 1cfd702..5fd035a 100644
--- a/server/src/Persistence/PaymentCategory.hs
+++ b/server/src/Persistence/PaymentCategory.hs
@@ -6,7 +6,6 @@ module Persistence.PaymentCategory
 
 import qualified Data.Maybe             as Maybe
 import           Data.Text              (Text)
-import qualified Data.Text              as T
 import           Data.Time.Clock        (getCurrentTime)
 import           Database.SQLite.Simple (FromRow (fromRow), Only (Only))
 import qualified Database.SQLite.Simple as SQLite
@@ -77,4 +76,4 @@ save newName categoryId =
             Nothing
   )
   where
-    formattedNewName = T.unaccent . T.toLower $ newName
+    formattedNewName = T.formatSearch newName