$LoadAddOns={"FeynHelpers"};
<<FeynCalc`

SPD[p,p]=m^2;

res1=TID[FVD[k,α] GSD[k] FAD[{k,m},p-k],k,ToPaVe->True]

PaXEvaluate[res1]

(*Old behavior*)
$LimitTo4=True;

res2=OneLoop[k,FVD[k,α] GSD[k] FAD[{k,m},p-k]]//ChangeDimension[#,D]&

PaXEvaluate[res2]