[Quantmod-commits] r599 - pkg/R

[noreply at r-forge.r-project.org]

Author: jryan
Date: 2013-01-11 21:48:44 +0100 (Fri, 11 Jan 2013)
New Revision: 599

Modified:
   pkg/R/replot.R
Log:
o  reverting back replot.R code... so much for 'no damage done!' 


Modified: pkg/R/replot.R
===================================================================
--- pkg/R/replot.R	2013-01-11 20:39:34 UTC (rev 598)
+++ pkg/R/replot.R	2013-01-11 20:48:44 UTC (rev 599)
@@ -4,7 +4,7 @@
   Env <- new.env()
   Env$frame <- frame
   Env$asp   <- asp
-  Env$usr   <- NULL # par("usr")
+  Env$usr   <- par("usr")
   Env$xlim  <- xlim
   Env$ylim  <- ylim
   Env$pad1 <- -0 # bottom padding per frame
@@ -192,7 +192,7 @@
   replot_env$set_ylim <- set_ylim
   replot_env$get_ylim <- get_ylim
   replot_env$set_pad <- set_pad
-  invisible(replot_env)
+  return(replot_env)
 } # }}}
 
 str.replot <- function(x, ...) {