Make editor always start at the end of the first line

This commit is contained in:
Joscha 2020-02-09 21:20:52 +00:00
parent 769bd02658
commit 817b0a34c4
2 changed files with 3 additions and 1 deletions

View file

@ -12,6 +12,7 @@ module Forest.Client.NodeEditor
import Brick
import Brick.Widgets.Edit
import qualified Data.Text as T
import Data.Text.Zipper
import qualified Graphics.Vty as Vty
import Forest.Client.ResourceName
@ -26,7 +27,7 @@ asReply = neReply
editNode :: T.Text -> NodeEditor
editNode text = NodeEditor
{ neEditor = editorText RnEditor (Just 1) text
{ neEditor = applyEdit gotoEOL $ editorText RnEditor (Just 1) text
, neReply = False
}