diff --git a/src/Handler/Utils/Communication.hs b/src/Handler/Utils/Communication.hs
index 7e81ba69a..ee7cb9ae6 100644
--- a/src/Handler/Utils/Communication.hs
+++ b/src/Handler/Utils/Communication.hs
@@ -249,7 +249,7 @@ commR CommunicationRoute{..} =  do
         , fieldMaxFileSize = Nothing, fieldMaxCumulativeSize = attachmentsMaxSize
         , fieldAllEmptyOk = True
         }
-  $logWarnS "COMM" "Communication handler some parameters done" -SEEN
+  $logWarnS "COMM" "Communication handler some parameters done"   -- SEEN
   ((commRes,commWdgt),commEncoding) <- runFormPost . identifyForm FIDCommunication . withButtonForm' universeF . renderAForm FormStandard $ Communication
     <$> recipientAForm
     <*  aformMessage recipientsListMsg
@@ -258,7 +258,7 @@ commR CommunicationRoute{..} =  do
             <*> (markupOutput <$> areq htmlField (fslI MsgCommBody) Nothing)
             <*> fmap fold (aopt (convertFieldM (runConduit . (.| C.foldMap Set.singleton)) yieldMany attachmentField) (fslI MsgCommAttachments & setTooltip MsgCommAttachmentsTip) Nothing)
         )  
-  $logWarnS "COMM" "Communication handler run form post done" -- NOT SEEN
+  $logWarnS "COMM" "Communication handler run form post done"   -- NOT SEEN ANYMORE
   formResult commRes $ \case
     (comm, BtnCommunicationSend) -> do
       runDBJobs . runConduit $ transPipe (mapReaderT lift) (crJobs comm) .| sinkDBJobs