menu * {
  Vowels
  .Off : set %vowel off
  .On : unset %vowel
}
on *:input:*: {
  if (%vowel == off) {
    haltdef
    msg $target $replace($1-,a,$null,e,$null,i,$null,o,$null,u,$null)
  }
}