Add changes from #4875 (#6049)

R/geom-path.R

@@ -36,8 +36,9 @@
 #' @examples
 #' # geom_line() is suitable for time series
 #' ggplot(economics, aes(date, unemploy)) + geom_line()
+#' # separate by colour and use "timeseries" legend key glyph
 #' ggplot(economics_long, aes(date, value01, colour = variable)) +
-#' geom_line()
+#' geom_line(key_glyph = "timeseries")
 #'
 #' # You can get a timeseries that run vertically by setting the orientation
 #' ggplot(economics, aes(unemploy, date)) + geom_line(orientation = "y")

R/geom-text.R

@@ -98,10 +98,11 @@
 #' scale_colour_discrete(l = 40)
 #' p + geom_label(aes(fill = factor(cyl)), colour = "white", fontface = "bold")
 #'
-#' p + geom_text(aes(size = wt))
+#' # Scale size of text, and change legend key glyph from a to point
+#' p + geom_text(aes(size = wt), key_glyph = "point")
 #' # Scale height of text, rather than sqrt(height)
 #' p +
-#' geom_text(aes(size = wt)) +
+#' geom_text(aes(size = wt), key_glyph = "point") +
 #' scale_radius(range = c(3,6))
 #'
 #' # You can display expressions by setting parse = TRUE. The