Indeed, FindSpanningTree returns tree:
FindSpanningTree[g, Method -> "MinimumCostAborescence",
VertexLabels -> "Name"]
The thing is HighlightGraph couldn't distinguish multi edges, i.e., when it come to 2<->3, HighlightGraph will highlight both 2<->3.