From 5e79857263aab51f85f54585ca4b54a801919999 Mon Sep 17 00:00:00 2001
From: Rostu <rs@leibniz-psychology.org>
Date: Tue, 3 Dec 2024 10:51:38 +0100
Subject: [PATCH] revert prior changes

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

diff --git a/R/rmaMVModel.R b/R/rmaMVModel.R
index 2f949ef..c400d4e 100644
--- a/R/rmaMVModel.R
+++ b/R/rmaMVModel.R
@@ -37,14 +37,14 @@ rmaMVModel <- function(yi,vi,measure,d,pred1=NULL,pred2=NULL,nesting=NULL) {
   if(!is.null(nesting)){
     nesting <- jsonlite::fromJSON(nesting)
   }
-#  if(!is.null(pred1)){
-#    # Parse the JSON string into a list
-#    pred1<-jsonlite::fromJSON(pred1)
-#  }
-#  if(!is.null(pred2)){
-#    # Parse the JSON string into a list
-#    pred2<-jsonlite::fromJSON(pred2)
-#  }
+  if(!is.null(pred1)){
+    # Parse the JSON string into a list
+    pred1<-jsonlite::fromJSON(pred1)
+  }
+  if(!is.null(pred2)){
+    # Parse the JSON string into a list
+    pred2<-jsonlite::fromJSON(pred2)
+  }
 
   checkParameter(dat,c(yi,vi))