diff --git a/DESCRIPTION b/DESCRIPTION
index 226376e6..0742135d 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,5 +1,5 @@
Package: AMR
-Version: 1.2.0.9009
+Version: 1.2.0.9010
Date: 2020-06-17
Title: Antimicrobial Resistance Analysis
Authors@R: c(
diff --git a/NEWS.md b/NEWS.md
index 78aa761e..273753ee 100755
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,4 +1,4 @@
-# AMR 1.2.0.9009
+# AMR 1.2.0.9010
## Last updated: 17-Jun-2020
### New
diff --git a/R/join_microorganisms.R b/R/join_microorganisms.R
index afcb3823..2ff9bb85 100755
--- a/R/join_microorganisms.R
+++ b/R/join_microorganisms.R
@@ -29,8 +29,8 @@
#' @param x existing table to join, or character vector
#' @param by a variable to join by - if left empty will search for a column with class [`mo`] (created with [as.mo()]) or will be `"mo"` if that column name exists in `x`, could otherwise be a column name of `x` with values that exist in `microorganisms$mo` (like `by = "bacteria_id"`), or another column in [microorganisms] (but then it should be named, like `by = c("my_genus_species" = "fullname")`)
#' @param suffix if there are non-joined duplicate variables in `x` and `y`, these suffixes will be added to the output to disambiguate them. Should be a character vector of length 2.
-#' @param ... other parameters to pass on to [dplyr::join()]
-#' @details **Note:** As opposed to the [join()] functions of `dplyr`, [`character`] vectors are supported and at default existing columns will get a suffix `"2"` and the newly joined columns will not get a suffix.
+#' @param ... ignored
+#' @details **Note:** As opposed to the `join()` functions of `dplyr`, [`character`] vectors are supported and at default existing columns will get a suffix `"2"` and the newly joined columns will not get a suffix.
#'
#' These functions rely on [merge()], a base R function to do joins.
#' @inheritSection AMR Read more on our website!
diff --git a/R/resistance_predict.R b/R/resistance_predict.R
index c754b292..29b62d3a 100755
--- a/R/resistance_predict.R
+++ b/R/resistance_predict.R
@@ -165,7 +165,7 @@ resistance_predict <- function(x,
year <- function(x) {
# don't depend on lubridate or so, would be overkill for only this function
if (all(grepl("^[0-9]{4}$", x))) {
- x
+ as.integer(x)
} else {
as.integer(format(as.Date(x), "%Y"))
}
diff --git a/docs/404.html b/docs/404.html
index d30ea81b..08a08f6b 100644
--- a/docs/404.html
+++ b/docs/404.html
@@ -81,7 +81,7 @@
NEWS.md
-
other parameters to pass on to dplyr::join()
ignored