setLanguage {tcltk2}

Change or get the language used in R and Tcl/Tk

Description

The function changes dynamically the language used by both R (messages only) and Tcl/Tk, or it retrieves its current value.

Usage

setLanguage(lang)
getLanguage()

Arguments

lang

an identification for the targeted language, for instance, \"en\" for English, \"fr\" for French, \"de\" for German, \"it\" for Italian, etc.

Value

setLanguage() returns TRUE if language was successfully changed in Tcl/Tk, FALSE otherwise. getLanguage() returns a string with current language in use for R, or an empty string if it cannot determinate which is the language currently used.

Note

You need the msgcat Tcl package to use this (but it is provided with all recent distributions of Tcl/Tk by default)

Author(s)

Philippe Grosjean

Examples

## Determine which language is currently in use in R
oldlang <- getLanguage()
if (oldlang != "") {
    ## Switch to English and test a command that issues a warning
    if (setLanguage("en_US")) 1:3 + 1:2
    ## Switch to French and test a command that issues a warning
    if (setLanguage("fr_FR")) 1:3 + 1:2
    ## Switch to German and test a command that issues a warning
    if (setLanguage("de_DE")) 1:3 + 1:2
    ## Switch to Italian and test a command that issues a warning
    if (setLanguage("it_IT")) 1:3 + 1:2
    ## Etc..

    ## Restore previous language
    setLanguage(oldlang)
}