worf.el (worf--pattern-transformer): improve