another attempt to fix build

package.yaml

@@ -254,7 +254,7 @@ ghc-options:
   - -fno-warn-unrecognised-pragmas
   - -fno-warn-partial-type-signatures
   - -fno-max-relevant-binds
-  - -j1
+  - -j
   - -freduction-depth=0
 when:
   - condition: flag(pedantic)
@@ -267,10 +267,12 @@ when:
         - -O0
         - -ddump-splices
         - -ddump-to-file
+        # - -Wderiving-typeable
       cpp-options: -DDEVELOPMENT
     else:
       ghc-options:
-        - -O -fllvm
+        - -O 
+        # -fllvm
 data-files:
   - testdata/**
 library:

src/Utils/Print.hs

@@ -43,7 +43,7 @@ import Handler.Utils.Users
 import Handler.Utils.DateTime
 import Handler.Utils.Mail
 import Handler.Utils.Widgets (nameHtml')
-import Handler.Utils.Avs (updateReceivers)
+-- import Handler.Utils.Avs (updateReceivers)
 import Jobs.Handler.SendNotification.Utils
 
 -- import Model.Types.Markup -- TODO-QSV: should this module be moved accordingly?
@@ -414,7 +414,7 @@ instance MDLetter LetterRenewQualificationF where
 
 sendEmailOrLetter :: (MDLetter l) => UserId -> l -> Handler Bool
 sendEmailOrLetter recipient letter = do  
-  (underling, receivers, undercopy) <- updateReceivers recipient
+  (underling, receivers, undercopy) <- runDB $ getReceivers recipient -- updateReceivers recipient -- TODO circular dependency
   let tmpl = getTemplate $ pure letter
       pjid = getPJId letter
       -- Below are only needed if sent by email