R/insertText.R

Defines functions insertText

insertText <- function(what, where, fastinsert = TRUE) {
    if (fastinsert) {
        .Tcl(.Tcl.args(.Tk.ID(where), 'fastinsert', 'insert', what))
    } else {
        tkinsert(where, "insert", what)
    }
    TRUE
}
leeper/rite documentation built on Oct. 14, 2017, 7:09 a.m.