R/aaa.r

In hyphenatr: Tools to Hyphenate Strings Using the 'Hunspell' Hyphenation Library

.pkgenv <- new.env(parent=emptyenv())

.onLoad<- function(libname, pkgname) {
  assign("curr_lang", "en_US", envir=.pkgenv)
  invisible(.Call('hyphenatr_init', PACKAGE = 'hyphenatr',
        system.file("extdata/dicts/hyph_en_US.dic", package="hyphenatr")))
}

.onUnload <- function (libpath) {
  invisible(.Call('hyphenatr_cleanup', PACKAGE = 'hyphenatr'))
  library.dynam.unload("hyphenatr", libpath)
}