# Explicit Discrete Fourier Transform to Kronecker Delta?

How can I have mathematica automatically simplify expressions like this

Sum[Exp[-I x k], {x, -Infinity, Infinity}]


using

KroneckerDelta[k]


? Evaluating the above using Simplify produces: Sum does not converge.

FourierSequenceTransform[1, x, k]