D[Integrate[Cos[x t]/t,{t, 0,x}],{x,1}]