Integrate[Log[x] Exp[-x] (1 - x), {x, 0, 1}]