handleInEditor :: St -> BrickEvent EditorName (E.TokenizedEvent [GHC.Located GHC.Token]) -> EventM EditorName (Next St)
handleInEditor st e =
  M.continue =<< handleEventLensed st edit1 E.handleEditorEvent e
handleInEditor :: St -> BrickEvent EditorName (E.TokenizedEvent [GHC.Located GHC.Token]) -> EventM EditorName (Next St)
handleInEditor st e =
  M.continue =<< handleEventLensed st edit1 E.handleEditorEvent e
handleInEditor st e =
  M.continue =<< handleEventLensed st edit1 E.handleEditorEvent e