Apart1[expr, x] is equivalent to Apart[expr, x], but it fixes a Mathematica bug relevant when expr contains complex numbers.
Apart1[expr, x]
Apart[expr, x]
Overview, Apart3.