-- selection persists even after shift is released
  check_eq(Editor_state.selection1.line, 1, 'F - test_select_text/selection:line')
  check_eq(Editor_state.selection1.pos, 1, 'F - test_select_text/selection:pos')
  check_eq(Editor_state.cursor1.line, 1, 'F - test_select_text/cursor:line')
  check_eq(Editor_state.cursor1.pos, 2, 'F - test_select_text/cursor:pos')
end
function test_cursor_movement_without_shift_resets_selection()
  io.write('\ntest_cursor_movement_without_shift_resets_selection')
  -- display a line of text with some part selected
  App.screen.init{width=75, height=80}
  Editor_state = edit.initialize_test_state()
  Editor_state.lines = load_array{'abc'}
  Text.redraw_all(Editor_state)
  Editor_state.cursor1 = {line=1, pos=1}
  Editor_state.selection1 = {line=1, pos=2}
  Editor_state.screen_top1 = {line=1, pos=1}
  Editor_state.screen_bottom1 = {}
  edit.draw(Editor_state)
  -- press an arrow key without shift
  edit.run_after_keychord(Editor_state, 'right')
  -- no change to data, selection is reset
  check_nil(Editor_state.selection1.line, 'F - test_cursor_movement_without_shift_resets_selection')
  check_eq(Editor_state.lines[1].data, 'abc', 'F - test_cursor_movement_without_shift_resets_selection/data')

  -- selection persists even after shift is release

  -- selection persists even after shift is released

function App.keyreleased(chord, key)
  -- ignore events for some time after window in focus (mostly alt-tab)

function App.keyreleased(key, scancode)

  -- ignore events for some time after window in focus (mostly alt-tab)

    if source.key_release then source.key_release(chord, key) end

    if source.key_release then source.key_release(key, scancode) end

    if run.mouse_pressed then run.mouse_press(x,y, mouse_button) end

    if run.mouse_press then run.mouse_press(x,y, mouse_button) end

    if source.mouse_pressed then source.mouse_press(x,y, mouse_button) end

    if source.mouse_press then source.mouse_press(x,y, mouse_button) end

    if source.key_release then source.key_release(key, scancode) end