Closes edzer#3

Actually ... won't work since `col` is already a named argument. Need to update manual page as well
MichaelChirico · May 21, 2018 · bcf50d9 · bcf50d9
1 parent 083b86e
commit bcf50d9
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/R/plot.Intervals_virtual.R b/R/plot.Intervals_virtual.R
@@ -8,6 +8,7 @@ plot.Intervals_full <- function(
                                 use_points = TRUE,
                                 use_names = TRUE,
                                 names_cex = 1,
+                                col_text = NULL,
                                 ...
                                 )
 {
@@ -59,7 +60,8 @@ plot.Intervals_full <- function(
          rownames( x ),
          pos = 3, offset = .5,
          cex = names_cex,
-         xpd = NA
+         xpd = NA,
+         col = text_col
          )         
   }
   if ( axes )