is there a way to use m/cata but add "context" to each recursion?

ex: i'm modifying the hiccup example from the cookbook

for recursions into block tags, i want to increase the indent level

ah, n/m, i realized i can use m/let and stuff it as an extra key into the root pattern