make GeomCol parent of geom_col() again for error message purposes

Author: teunbrand

R/geom-col.R

@@ -1,11 +1,11 @@
-#' @export
-#' @rdname geom_bar
-geom_col <- make_constructor(GeomBar, position = "stack", just = 0.5)
-
 #' @rdname ggplot2-ggproto
 #' @format NULL
 #' @usage NULL
 #' @export
 #' @include geom-rect.R
 # TODO: deprecate this
 GeomCol <- ggproto("GeomCol", GeomBar)
+
+#' @export
+#' @rdname geom_bar
+geom_col <- make_constructor(GeomCol, position = "stack", just = 0.5)