Check mapping suppression sentinel

1 files changed, 19 insertions, 0 deletions

diff --git a/tests/run.lua b/tests/run.lua
index 66816bb..4e1649a 100644
--- a/tests/run.lua
+++ b/tests/run.lua
@@ -7187,6 +7187,25 @@ test("Core activation exposes all seven logical actions", function()
   same(domain.ActionKind.NEUTRAL, host:invoke_action("Reset").kind)
 end)
 
+test("Core activation checks mapping suppression by sentinel presence", function()
+  fresh_sequence_state()
+  local absent = composition_root.new({ host = MemoryHost.new() }):activate()
+  truthy(absent.setup.install_default_mappings)
+
+  for _, value in ipairs({ false, 0 }) do
+    fresh_sequence_state()
+    local configuration = {}
+    configuration[policy.DEFAULT_MAP_SUPPRESSION_SENTINEL] = value
+    local host = MemoryHost.new({ configuration = configuration })
+    local root = composition_root.new({ host = host })
+    local activation = root:activate()
+    falsy(activation.setup.install_default_mappings)
+
+    host:unset_configuration(policy.DEFAULT_MAP_SUPPRESSION_SENTINEL)
+    falsy(root:activate().setup.install_default_mappings)
+  end
+end)
+
 test("Primary coordination accepts only the four motion descriptors", function()
   local coordinator = sequence_coordinator.new({ host = MemoryHost.new() })
   for _, value in ipairs({ "f", "F", "t", "T" }) do