ggplot2 - How to replace geom symbol in legend?

Question

I am using ggplot2 to plot a time-series graph showing cumulative rainfall for both the current year and the historical values. I am also adding a couple of ver