diff options
Diffstat (limited to 'src/lib/modifiers/mute.ml')
| -rw-r--r-- | src/lib/modifiers/mute.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lib/modifiers/mute.ml b/src/lib/modifiers/mute.ml index 7b58336..2a307e0 100644 --- a/src/lib/modifiers/mute.ml +++ b/src/lib/modifiers/mute.ml @@ -9,9 +9,9 @@ let process = fun init -> let ((v, c) , ending) = init in let is_voyel = Sounds.is_voyel v in - match is_voyel, c with - | false, Some c -> - let c = { c with Sig.opening = List.map ~f:Sounds.muted c.Sig.opening } in + match is_voyel, c, ending with + | false, Some c, None -> + let c = { c with Sig.opening = List.map ~f:Sounds.mute c.Sig.opening } in ((v, Some c) , ending) | _ -> init |