use grDevices:: for dev.cur et al.

[r/CairoHacks.git] / R / raster_plots.R

diff --git a/R/raster_plots.R b/R/raster_plots.R
index 2e831a94afcdb9ce2cf69f160915ffd2b8de9cf7..419c5de47a52951dc67bf2f90b9a081f3b268b88 100644 (file)
--- a/R/raster_plots.R
+++ b/R/raster_plots.R
@@ -65,8 +65,8 @@ start_rasterplot <- function(width=NULL,height=NULL) {
 ##' @export
 ##' @seealso start_rasterplot
 stop_rasterplot <- function(plot=TRUE) {
-    raster.image <- dev.capture(native=TRUE)
-    dev.off()
+    raster.image <- grDevices::dev.capture(native=TRUE)
+    grDevices::dev.off()
     if (plot) {
         grid::grid.raster(raster.image,width=grid::unit(1,"npc"),height=grid::unit(1,"npc"))
     }