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 Aug. 1, 2018, 6:33 a.m.