// return a function that adds "-= ... =-" decorations to the given text
text -> ("-= ", text, " =-").concat