tabify

• (send a-scheme:text tabify start-pos) -> void
      start-pos = (send this get-start-position) : exact-integer

  Tabs the line containing by start-pos