From a59d0661f7f6afc2c6180da34e1db53407cc4582 Mon Sep 17 00:00:00 2001
From: "Matthijs S. Berends" <m.s.berends@umcg.nl>
Date: Wed, 1 Aug 2018 09:45:11 +0200
Subject: [PATCH] check CMD error

---
 R/bactid.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/bactid.R b/R/bactid.R
index 75ed14eb..0c1bcb98 100644
--- a/R/bactid.R
+++ b/R/bactid.R
@@ -174,6 +174,7 @@ as.bactid <- function(x) {
       if (toupper(x.backup[i]) %in% c('PISP', 'PRSP', 'VISP', 'VRSP')) {
         # peni R, peni I, vanco I, vanco R: S. pneumoniae
         x[i] <- 'STCPNE'
+        next
       }
     }