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