comment out debugs and remove outdated test code

mi-erasmusmc · Oct 7, 2024 · 653b524 · 653b524
1 parent 2c70a34
commit 653b524
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 13 deletions.
diff --git a/extras/R6ClassFun.R b/extras/R6ClassFun.R
@@ -427,7 +427,7 @@ Strategus::createResultDataModel(
 )
 
 # Upload results ---------------
-debugonce(Strategus::uploadResults)
+#debugonce(Strategus::uploadResults)
 Strategus::uploadResults(
   analysisSpecifications = analysisSpecifications,
   resultsDataModelSettings = resultsDataModelSettings,

diff --git a/tests/testthat/test-PatientLevelPredictionValidationModule.R b/tests/testthat/test-PatientLevelPredictionValidationModule.R
@@ -48,21 +48,10 @@ test_that("Test PLP Validation Module", {
     resultsFolder = resultsFolder
   )
 
-  debugonce(PatientLevelPredictionValidationModule$debug('execute'))
+  # debugonce(PatientLevelPredictionValidationModule$debug('execute'))
   Strategus::execute(
     analysisSpecifications = analysisSpecifications,
     executionSettings = executionSettings,
     connectionDetails = connectionDetails
   )
-
-  # TODO - Remove in favor of the code
-  # above once I have more clarity on the
-  # settings
-  debugonce(plpvSettingsCreator$execute)
-  plpvSettingsCreator$execute(
-    analysisSpecifications = analysisSpecifications,
-    executionSettings = executionSettings,
-    connectionDetails = connectionDetails
-  )
-
 })