Changeset 320d511 in tol


Ignore:
Timestamp:
Mar 25, 2010, 10:40:34 AM (17 years ago)
Author:
Jorge Pérez <josp.jorge@…>
Branches:
1941-docker-image-to-test, devel, master
Children:
465c1d5
Parents:
57e34db
Message:

::Editor::InsertText

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2062 be4846ae-f051-483a-831f-b64e7d08527f

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tolbase/lib/toltk/editor.tcl

    r57e34db r320d511  
    929929}
    930930
    931 
     931proc ::Editor::InsertText {this new_text {pos end} } {
     932  upvar \#0 ${this}::data data
     933  $data(txt) insert $pos $new_text
     934}
    932935
    933936proc ::Editor::GetText {this} {
Note: See TracChangeset for help on using the changeset viewer.