From ebb4c4375ec5712ef0e7facb6a32ee6709ae7adc Mon Sep 17 00:00:00 2001
From: Silvio <s.waschina@nutrinf.uni-kiel.de>
Date: Tue, 11 Jun 2024 00:12:44 +0200
Subject: [PATCH] enable solver plugins

---
 NAMESPACE  | 1 +
 R/cobrar.R | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/NAMESPACE b/NAMESPACE
index ea5d33a..a53c3ef 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -86,6 +86,7 @@ import(Matrix)
 importFrom(Rcpp,evalCpp)
 importFrom(methods,.valueClassTest)
 importFrom(methods,as)
+importFrom(methods,existsMethod)
 importFrom(methods,is)
 importFrom(methods,new)
 importFrom(stats,aggregate)
diff --git a/R/cobrar.R b/R/cobrar.R
index 83c4658..a2c609e 100644
--- a/R/cobrar.R
+++ b/R/cobrar.R
@@ -61,6 +61,8 @@ NULL
 #' @param value Choose a value to over-write the current parameter.
 #' @param ... TBD.
 #'
+#' @importFrom methods existsMethod
+#'
 #' @export
 COBRAR_SETTINGS <- function(parm, value, ...) {
 
@@ -86,8 +88,6 @@ COBRAR_SETTINGS <- function(parm, value, ...) {
          },
 
          "SOLVER" = {
-           if(value != "glpk")
-             warning("Currently, only glpk is supported as solver.")
            .COBRARenv$settings[["SOLVER"]] <- as.character(value)
          },