## Not run: 
#   # setup pkg for localization
#   pkg <- dummy_pkg()
#   use_localization(pkg = pkg)
#   
#   # generate translation in memory
#   (tran <- make_translation("es", translator = "Some Person <example@examle.com>", pkg = pkg))
#   
#   # edit translations
#   tran2 <- edit_translation(tran, pkg = pkg)
#   # write to disk
#   write_translation(tran2, pkg = pkg)
# ## End(Not run)
Run the code above in your browser using DataLab