.First.lib <- function(lib, pkg)
    stop("Tcl/Tk support is not available on this system", domain = "R-tcltk")
