From a7549e2da10db49e1f2ba7421be35c505cd78e6a Mon Sep 17 00:00:00 2001
From: Johannes Boog <johannesboog@yahoo.de>
Date: Mon, 14 Nov 2022 22:12:02 +0100
Subject: [PATCH] [bugfix] skip renaming independent_variable element

---
 R/prj_medium.R | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/R/prj_medium.R b/R/prj_medium.R
index ef0d323..e475b43 100644
--- a/R/prj_medium.R
+++ b/R/prj_medium.R
@@ -522,14 +522,14 @@ new_prj_ph_property <- function(name,
 
     are_null_or_strings(parameter_name, curve)
 
-    if (!is.null(independent_variable)) {
-        independent_variable <- lapply(independent_variable, function(x){
-            x <- coerce_names(x,
-                              c("variable_name",
-                                "reference_condition",
-                                "slope"))
-        })
-    }
+    # if (!is.null(independent_variable)) {
+    #     independent_variable <- lapply(independent_variable, function(x){
+    #         x <- coerce_names(x,
+    #                           c("variable_name",
+    #                             "reference_condition",
+    #                             "slope"))
+    #     })
+    # }
 
     if (!is.null(exponent)) {
         exponent <- coerce_names(exponent,
-- 
GitLab