Comparing multiple (g)lm in one graph

It is already possible to compare multiple models as table output, here the author has built a function that plots several (g)lm-objects in a single ggplot-graph:

http://www.r-bloggers.com/comparing-multiple-glm-in-one-graph-rstats/