diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,7 +1,12 @@
+# 1.2.2
+
+  - Support for megaparsec-5.3.0
+  - Bump brick dependency to 0.19
+
 # 1.2.1
 
   - Support for hledger-lib-1.2
-  - Minor documnentation fixes
+  - Minor documentation fixes
 
 # 1.2
 
diff --git a/hledger-iadd.cabal b/hledger-iadd.cabal
--- a/hledger-iadd.cabal
+++ b/hledger-iadd.cabal
@@ -1,5 +1,5 @@
 name:                hledger-iadd
-version:             1.2.1
+version:             1.2.2
 synopsis:            A terminal UI as drop-in replacement for hledger add
 description:         This is a terminal UI as drop-in replacement for hledger add.
                      .
@@ -57,7 +57,7 @@
   default-language:    Haskell2010
   build-depends:       base >= 4.8 && < 5
                      , hledger-lib >= 1.0 && < 1.3
-                     , brick >= 0.15.2 && < 0.18
+                     , brick >= 0.19 && < 0.20
                      , vty >= 5.4
                      , text
                      , microlens
@@ -65,7 +65,7 @@
                      , transformers >= 0.3
                      , time >= 1.5
                      , vector
-                     , megaparsec >= 5.0 && <5.3
+                     , megaparsec >= 5.0 && <5.4
                      , containers
                      , optparse-applicative
                      , directory
@@ -82,7 +82,7 @@
   build-depends:       base >= 4.8 && < 5
                      , hledger-iadd
                      , hledger-lib >= 1.0 && < 1.3
-                     , brick >= 0.15.2 && < 0.18
+                     , brick >= 0.19 && < 0.20
                      , vty >= 5.4
                      , text
                      , microlens
@@ -96,7 +96,7 @@
                      , xdg-basedir
                      , unordered-containers
                      , free >= 4.12.4
-                     , megaparsec >= 5.0 && <5.3
+                     , megaparsec >= 5.0 && <5.4
   ghc-options:         -threaded -Wall -fdefer-typed-holes -fno-warn-name-shadowing
 
 test-suite spec
@@ -119,6 +119,6 @@
                     , QuickCheck
                     , text-format
                     , free >= 4.12.4
-                    , megaparsec >= 5.0 && <5.3
+                    , megaparsec >= 5.0 && <5.4
                     , text-zipper >= 0.10
   ghc-options:        -threaded -Wall -fdefer-typed-holes -fno-warn-name-shadowing
diff --git a/src/Brick/Widgets/CommentDialog.hs b/src/Brick/Widgets/CommentDialog.hs
--- a/src/Brick/Widgets/CommentDialog.hs
+++ b/src/Brick/Widgets/CommentDialog.hs
@@ -35,7 +35,7 @@
     title = "ESC: cancel, RET: accept, Alt-RET: New line"
     maxWidth = 80
     diag = dialog (Just title) Nothing maxWidth
-    edit = editorText name (txt . T.unlines) Nothing comment
+    edit = editorText name Nothing comment
   in
     CommentWidget
       { origComment = comment
@@ -62,8 +62,9 @@
 renderCommentWidget widget =
   let
     height = min (length (getEditContents (textArea widget)) + 4) 24
+    drawer = txt . T.unlines
     textArea' =  padTop (Pad 1) $
-      txt (promptPrefix widget <> ": ") <+> renderEditor True (textArea widget)
+      txt (promptPrefix widget <> ": ") <+> renderEditor drawer True (textArea widget)
   in
     vCenterLayer $ vLimit height $ renderDialog (dialogWidget widget) textArea'
 
diff --git a/src/main/Main.hs b/src/main/Main.hs
--- a/src/main/Main.hs
+++ b/src/main/Main.hs
@@ -118,7 +118,7 @@
           <=> (viewQuestion (asStep as)
                <+> viewSuggestion (asSuggestion as)
                <+> txt ": "
-               <+> renderEditor True (asEditor as))
+               <+> renderEditor (txt . T.concat) True (asEditor as))
           <=> hBorder
           <=> expand (viewContext (asContext as))
           <=> hBorder
@@ -501,7 +501,7 @@
   runExceptT (HL.parseAndFinaliseJournal HL.journalp True path journalContents) >>= \case
     Left err -> hPutStrLn stderr err >> exitFailure
     Right journal -> do
-      let edit = editor EditorName (txt . T.concat) (Just 1) ""
+      let edit = editor EditorName (Just 1) ""
 
       sugg <- suggest journal date (DateQuestion "")