diff options
Diffstat (limited to 'editor/editor.ml')
-rwxr-xr-x | editor/editor.ml | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/editor/editor.ml b/editor/editor.ml index 9eee49e..8dc13e8 100755 --- a/editor/editor.ml +++ b/editor/editor.ml @@ -137,18 +137,12 @@ let app id content = ~eq:State.eq init_state (Note.E.select - [ Brr_note.Evr.on_el Ev.focusout - (fun _ -> + [ Brr_note.Evr.on_els Ev.focusout + (fun _ _ -> State.E ( title , (module Store:State.Event with type t = Store.t))) - editor - ; Brr_note.Evr.on_el Ev.focusout - (fun _ -> - State.E - ( title - , (module Store:State.Event with type t = Store.t))) - title + [ editor ; title ] ; btn_events ]) in |