The same thing but without a free variable. The issue you have is that Series does not return a function but an expression in some variable x, and you then want to specify it to x=x0 for some number x0
f[x_] := Sin[x]/x;
t[n_, x0_] :=
Module[{x}, ReplaceAll[Normal[Series[f[x], {x, 0, n}]], x -> x0]];
Manipulate[
Plot[{f[x], t[n, x]}, {x, -2*Pi, 2*Pi}, PlotRange -> All], {n, 0, 6,
1}]