diff --git a/controller/tests/server/update/scenario.ml b/controller/tests/server/update/scenario.ml
index c27fac47..859e2349 100644
--- a/controller/tests/server/update/scenario.ml
+++ b/controller/tests/server/update/scenario.ml
@@ -121,7 +121,7 @@ let rec run_test_scenario (test_context: Helpers.test_context) expected_state_se
 (* NOTE: this is almost the same as the `Outcome.test_slot_spec,
          except that it expects a specific state outcome and uses the
          `run_test_scenario` machinery. *)
-let test_version_logic_case
+let scenario_from_system_spec
     ?(booted_slot=Rauc.Slot.SystemA)
     ?(primary_slot=(Some Rauc.Slot.SystemA))
     ~(input_versions:Update.version_info)
diff --git a/controller/tests/server/update/update_tests.ml b/controller/tests/server/update/update_tests.ml
index bf66a606..0c9995e8 100644
--- a/controller/tests/server/update/update_tests.ml
+++ b/controller/tests/server/update/update_tests.ml
@@ -132,7 +132,7 @@ let both_newer_than_upstream =
   let expected_state =
       UpToDate input_versions
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let booted_newer_secondary_older =
   let input_versions = {
@@ -143,7 +143,7 @@ let booted_newer_secondary_older =
   let expected_state =
       UpToDate input_versions
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let booted_older_secondary_newer =
   let input_versions = {
@@ -154,7 +154,7 @@ let booted_older_secondary_newer =
   let expected_state =
       OutOfDateVersionSelected
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let booted_current_secondary_current =
   let input_versions = {
@@ -165,7 +165,7 @@ let booted_current_secondary_current =
   let expected_state =
       UpToDate input_versions
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let booted_current_secondary_older =
   let input_versions = {
@@ -176,7 +176,7 @@ let booted_current_secondary_older =
   let expected_state =
       UpToDate input_versions
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let booted_older_secondary_current =
   let input_versions = {
@@ -186,7 +186,7 @@ let booted_older_secondary_current =
   } in
   let expected_state = OutOfDateVersionSelected
   in
-  Scenario.test_version_logic_case ~input_versions expected_state
+  Scenario.scenario_from_system_spec ~input_versions expected_state
 
 let () =
   Lwt_main.run