Block Cursor in JRubySWT.rb

module Redcar
  class REPL
    class Tab < Redcar::EditTab

      ...

      def update_cursor_size
        if widget = edit_view.controller.mate_text.get_text_widget
          caret = Swt::Widgets::Caret.new(widget, Swt::SWT::NONE)
          caret.set_image(nil)
          widget.set_caret(caret)
          height = widget.get_line_height
          width  = edit_view.controller.char_width
          caret.set_size(width,height)
          caret.set_visible(true)
        end
      end
    end
  end
end