diff options
| -rw-r--r-- | test/test_oracle.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/test_oracle.ml b/test/test_oracle.ml index cd980aa..c1d0e6a 100644 --- a/test/test_oracle.ml +++ b/test/test_oracle.ml @@ -1011,7 +1011,7 @@ let layer_m_reason (c : colitur_row) (_o : oracle_row) diffs = else if List.mem c.c_date m19_dates && diffs = [ Comm_presence ] && m19_commemoration_matches c then Some "M19" else if - List.mem c.c_observed_slug m21_colour_slugs && subset diffs [ Colour_f; Comm_identity_unresolved ] + List.mem c.c_observed_slug m21_colour_slugs && diffs = [ Colour_f ] then Some "M21" else if List.mem c.c_date m22_dates && diffs = [ Comm_count ] && m22_commemoration_matches c then Some "M22" |