Rename Short Forms in Mathematica.nb to short forms in Mathematica.nb