In version 7 you will need:

    DistributeDefinitions[FftShift1D, eqn]

This seems to be running very slowly however, which I am looking into.