When using the xAct package xCoba to compute a Lie derivative, is there a simple way to adjust the accepted answer here (reproduced below) so that the components will display in the same way (eg $\frac{\partial f}{\partial\phi}[\theta,\phi]$ instead of $f^{(0,1)}[\theta,\phi]$ for a function $f[\theta,\phi]$ appearing in such a computation)?
Derivative /:
MakeBoxes[Derivative[α__][f1_][vars__?AtomQ],
TraditionalForm] := Module[{bb, dd, sp},
MakeBoxes[dd, _] ^=
If[Length[{α}] == 1, "\[DifferentialD]", "∂"];
MakeBoxes[sp, _] ^= "\[ThinSpace]";
bb /: MakeBoxes[bb[x__], _] := RowBox[Map[ToBoxes[#] &, {x}]];
TemplateBox[{ToBoxes[bb[dd^Plus[α], f1]],
ToBoxes[Apply[bb,
Riffle[Map[
bb[dd, #] &, (Pick[{vars}, #]^Pick[{α}, #] &[
Thread[{α} > 0]])], sp]]],
ToBoxes[Derivative[α][f1][vars]]}, "ShortFraction",
DisplayFunction :> (FractionBox[#1, #2] &),
InterpretationFunction :> (#3 &), Tooltip -> Automatic]]