Thank you,
Excellent! That also solves the issue I've had with the Log function:
Log[x y z] //.Log[HoldPattern[Times[fcts__]]] :> Inactive[Plus] @@ Map[Log, {fcts}]
which gets me
Log[x]+Log[y]+Log[z]
Thanks to both of you!
You may experiment with the new Inactive function:
Exp[x + y + z] //. E^HoldPattern[Plus[fcts__]] :> Inactive[Times] @@ Map[Exp, {fcts}]
I am not familiar with Inactive yet.