From 4ba2ff68e00f66c1baa780c24b786e0b343c9e83 Mon Sep 17 00:00:00 2001 From: "Matthijs S. Berends" Date: Tue, 26 Feb 2019 13:02:04 +0100 Subject: [PATCH] language fix --- R/mo_property.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/mo_property.R b/R/mo_property.R index f25e5eb2..bfb8c85d 100755 --- a/R/mo_property.R +++ b/R/mo_property.R @@ -132,7 +132,7 @@ #' mo_taxonomy("E. coli") mo_fullname <- function(x, language = get_locale(), ...) { x <- mo_validate(x = x, property = "fullname", ...) - translate(x, language = language) + mo_translate(x, language = language) } #' @rdname mo_property @@ -199,13 +199,13 @@ mo_shortname <- function(x, language = get_locale(), ...) { } } - translate(result, language = language) + mo_translate(result, language = language) } #' @rdname mo_property #' @export mo_subspecies <- function(x, language = get_locale(), ...) { - translate(validate(x = x, property = "subspecies", ...), language = language) + mo_translate(mo_validate(x = x, property = "subspecies", ...), language = language) } #' @rdname mo_property