remove redundant scaled.shifted setting from lav_update_test_custom_h1()

yrosseel · Jun 20, 2024 · 5aae5f6 · 5aae5f6
1 parent 415e976
commit 5aae5f6
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/R/lav_test.R b/R/lav_test.R
@@ -734,7 +734,6 @@ lav_update_test_custom_h1 <- function(lav_obj_h0, lav_obj_h1) {
         lrtCall$method <- "mean.var.adjusted.PLRT"
       } else {
         lrtCall$method <- "satorra.2000"
-        if (tn == "mean.var.adjusted") lrtCall$scaled.shifted <- FALSE
       }
       lrtCall$scaled.shifted <- tn == "scaled.shifted"
     } else if (tn %in% c("satorra.bentler",