From ecce81f328666064301c805f741ff0d1bf26cb32 Mon Sep 17 00:00:00 2001
From: Marco Torchiano <marco.torchiano@polito.it>
Date: Fri, 13 Dec 2019 09:24:34 +0100
Subject: [PATCH] Changed the parent prototype class for GeomXspline

In order to get a similar result as the base graphics `xspline` function, the base proto class has to be a path and not a line.

Fixing issue #34
---
 R/geom_xspline.r | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/geom_xspline.r b/R/geom_xspline.r
index 5844aaa..aec1d54 100644
--- a/R/geom_xspline.r
+++ b/R/geom_xspline.r
@@ -148,7 +148,7 @@ geom_xspline <- function(mapping = NULL, data = NULL, stat = "xspline",
 #' @usage NULL
 #' @keywords internal
 #' @export
-GeomXspline <- ggproto("GeomXspline", GeomLine,
+GeomXspline <- ggproto("GeomXspline", GeomPath,
   required_aes = c("x", "y"),
   default_aes = aes(colour = "black", size = 0.5, linetype = 1, alpha = NA)
 )