mirror of
https://github.com/msberends/AMR.git
synced 2024-12-26 07:26:13 +01:00
language fix
This commit is contained in:
parent
f9ded23023
commit
4ba2ff68e0
@ -132,7 +132,7 @@
|
|||||||
#' mo_taxonomy("E. coli")
|
#' mo_taxonomy("E. coli")
|
||||||
mo_fullname <- function(x, language = get_locale(), ...) {
|
mo_fullname <- function(x, language = get_locale(), ...) {
|
||||||
x <- mo_validate(x = x, property = "fullname", ...)
|
x <- mo_validate(x = x, property = "fullname", ...)
|
||||||
translate(x, language = language)
|
mo_translate(x, language = language)
|
||||||
}
|
}
|
||||||
|
|
||||||
#' @rdname mo_property
|
#' @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
|
#' @rdname mo_property
|
||||||
#' @export
|
#' @export
|
||||||
mo_subspecies <- function(x, language = get_locale(), ...) {
|
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
|
#' @rdname mo_property
|
||||||
|
Loading…
Reference in New Issue
Block a user