Made two subroutines that actually work.

The first subroutine to actually do something useful: iterate over all
text elements, operate only on those which are paragraphs, then iterate
over all text portions in each paragraph and, to those that have a
certain style, apply another style. Yay!