Added error bar color is now inherited from the main plot, fix for #109

kassambara · Sep 17, 2018 · adae314 · adae314
1 parent d037d18
commit adae314
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -8,14 +8,16 @@
 
 ## Minor changes
 
-
+## Bug fixes
+
+- Added error bar color is now inherited from the main plot ([@JesseRop, #109](https://github.com/kassambara/ggpubr/issues/109)
 
 # ggpubr 0.1.8
 
 
 ## New features
 
-- New arguments `bxp.errorbar` added to `ggboxplot()` for adding error bars at the top of the box plots ([@	j3ypi, #105](https://github.com/kassambara/ggpubr/issues/105).
+- New arguments `bxp.errorbar` added to `ggboxplot()` for adding error bars at the top of the box plots ([@j3ypi, #105](https://github.com/kassambara/ggpubr/issues/105).
 - New function `stat_pvalue_manual()` for adding p-values generated elswhere ([@achamess, #81](https://github.com/kassambara/ggpubr/issues/81), [@grst, #65](https://github.com/kassambara/ggpubr/issues/65)).
 
 

diff --git a/R/ggadd.R b/R/ggadd.R
@@ -51,6 +51,7 @@ ggadd <- function(p, add = NULL, color = "black", fill = "white", group = 1,
 {
 
   . <- NULL
+  if(missing(group)) group <- NULL
   # Checkpoints
   #:::::::::::::::::::::::::::::::::::::::::::
   if("none" %in% add) add <- "none"