From 93a829b81b45639b0841bac72dc57416b50ef01c Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Mon, 7 Jun 2021 15:13:04 +0200 Subject: [PATCH] fix: added uw-enter-as-tab to CCommR subject field --- src/Handler/Utils/Communication.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Handler/Utils/Communication.hs b/src/Handler/Utils/Communication.hs index c5575a65b..27a8e31a0 100644 --- a/src/Handler/Utils/Communication.hs +++ b/src/Handler/Utils/Communication.hs @@ -209,7 +209,7 @@ commR CommunicationRoute{..} = do ((commRes,commWdgt),commEncoding) <- runFormPost . identifyForm FIDCommunication . withButtonForm' universeF . renderAForm FormStandard $ Communication <$> recipientAForm <* aformMessage recipientsListMsg - <*> aopt textField (fslI MsgCommSubject) Nothing + <*> aopt textField (fslI MsgCommSubject & addAttr "uw-enter-as-tab" "") Nothing <*> (markupOutput <$> areq htmlField (fslI MsgCommBody) Nothing) formResult commRes $ \case (comm, BtnCommunicationSend) -> do