From 79038fed2169a25a7fc067c80bb25d9d78be21d9 Mon Sep 17 00:00:00 2001
From: Matthijs Berends <m.s.berends@umcg.nl>
Date: Sun, 1 Jun 2025 16:07:38 +0200
Subject: [PATCH] (v2.1.1.9290) typo

---
 DESCRIPTION | 2 +-
 NEWS.md     | 2 +-
 R/mdro.R    | 4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 440323d91..3c95254c2 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: AMR
-Version: 2.1.1.9289
+Version: 2.1.1.9290
 Date: 2025-06-01
 Title: Antimicrobial Resistance Data Analysis
 Description: Functions to simplify and standardise antimicrobial resistance (AMR)
diff --git a/NEWS.md b/NEWS.md
index a5c3a80a1..d02c257e3 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,4 +1,4 @@
-# AMR 2.1.1.9289
+# AMR 2.1.1.9290
 
 *(this beta version will eventually become v3.0. We're happy to reach a new major milestone soon, which will be all about the new One Health support! Install this beta using [the instructions here](https://amr-for-r.org/#get-this-package).)*
 
diff --git a/R/mdro.R b/R/mdro.R
index bc8235063..ceca548dc 100755
--- a/R/mdro.R
+++ b/R/mdro.R
@@ -204,14 +204,14 @@ mdro <- function(x = NULL,
   }
   if (is.character(vanA)) {
     meet_criteria(vanA, is_in = colnames(x), allow_NA = FALSE, has_length = 1)
-    vanA <- x[[VanA]]
+    vanA <- x[[vanA]]
     meet_criteria(vanA, allow_class = "logical", allow_NA = TRUE)
   } else if (length(vanA) == 1) {
     vanA <- rep(vanA, NROW(x))
   }
   if (is.character(vanB)) {
     meet_criteria(vanB, is_in = colnames(x), allow_NA = FALSE, has_length = 1)
-    vanB <- x[[VanB]]
+    vanB <- x[[vanB]]
     meet_criteria(vanB, allow_class = "logical", allow_NA = TRUE)
   } else if (length(vanB) == 1) {
     vanB <- rep(vanB, NROW(x))