basis/ui/backend/gtk/input-methods/editors/editors.factor

   1 ! Copyright (C) 2011 Anton Gorenko.
   2 ! See https://factorcode.org/license.txt for BSD license.
   3 USING: kernel sequences ui.backend.gtk.input-methods
   4 ui.gadgets.editors ;
   5 IN: ui.backend.gtk.input-methods.editors
   6
   7 M: editor support-input-methods? drop t ;
   8
   9 M: editor cursor-surrounding
  10     dup editor-caret first2 [ swap editor-line ] dip ;
  11
  12 M: editor delete-cursor-surrounding
  13     3drop ;
  14
  15 M: editor cursor-loc&dim
  16     [ caret-loc ] [ caret-dim ] bi ;