Integrate[Exp[-x] Exp[I a x] Log[x]/x,x]