Here's a quick fix:
DiscretePlot[
Tooltip[PDF[PoissonDistribution[10], x]]
, {x, 0, 20}] /. Tooltip[a_, b_] :> Map[Tooltip[Point[#], Last@#] &, a[[3, 1]]]
Here's a quick fix:
DiscretePlot[
Tooltip[PDF[PoissonDistribution[10], x]]
, {x, 0, 20}] /. Tooltip[a_, b_] :> Map[Tooltip[Point[#], Last@#] &, a[[3, 1]]]