Revert #4434

Author: thomasp85

NEWS.md

@@ -1,5 +1,8 @@
 # ggplot2 (development version)
 
+* Revert changes made in #4434 (apply transform to intercept in `geom_abline()`) 
+  as it introduced undesirable issues far worse than the bug it fixed.
+
 # ggplot2 3.3.4
 This is a larger patch release fixing a huge number of bugs and introduces a 
 small selection of feature refinements.

R/ggplot-global.R

@@ -20,8 +20,7 @@ ggplot_global$element_tree <- list()
   "colour", "fg", "fill", "group", "hjust", "label", "linetype", "lower",
   "lty", "lwd", "max", "middle", "min", "pch", "radius", "sample", "shape",
   "size", "srt", "upper", "vjust", "weight", "width", "x", "xend", "xmax",
-  "xmin", "xintercept", "y", "yend", "ymax", "ymin", "yintercept", "z",
-  "intercept"
+  "xmin", "xintercept", "y", "yend", "ymax", "ymin", "yintercept", "z"
 )
 
 ggplot_global$all_aesthetics <- .all_aesthetics
@@ -49,7 +48,7 @@ ggplot_global$base_to_ggplot <- .base_to_ggplot
 # These two vectors must match in length and position of symmetrical aesthetics
 # xintercept2 is a filler to match to the intercept aesthetic in geom_abline
 ggplot_global$x_aes <- c("x", "xmin", "xmax", "xend", "xintercept",
-  "xmin_final", "xmax_final", "xlower", "xmiddle", "xupper", "x0", "xintercept2")
+  "xmin_final", "xmax_final", "xlower", "xmiddle", "xupper", "x0")
 
 ggplot_global$y_aes <- c("y", "ymin", "ymax", "yend", "yintercept",
-  "ymin_final", "ymax_final", "lower", "middle", "upper", "y0", "intercept")
+  "ymin_final", "ymax_final", "lower", "middle", "upper", "y0")