R_DEFAULT_DEVICE (PR#11294)

Setting enviroment variable R_DEFAULT_DEVICE causes an error. 
The patch below fixes this.
  
Probably, but it may not be the best fix, so please give your analysis
of the situation. Reproducible example and all that.

To do your homework for you, the issue seems to be this:

viggo:~/>R_INTERACTIVE_DEVICE=pdf ~/misc/r-release-branch/BUILD-dist/bin/R

R version 2.7.0 (2008-04-22)
....
plot(0)
Error in plot.new() : no active or default device
names(options())
[1] "HTTPUserAgent"               "OutDec"
 [3] "add.smooth"                  "bitmapType"
 [5] "browser"                     "check.bounds"
 [7] "continue"                    "contrasts"
 [9] "defaultPackages"             "device.R_INTERACTIVE_DEVICE"

OBS!!!

[11] "device.ask.default"          "digits"
.....
[47] "useFancyQuotes"              "verbose"
[49] "warn"                        "warnings.length"
[51] "width"
                
I guess the same goes for R_INTERACTIVE_DEVICE.

--- R-2.7.0/src/library/grDevices/R/zzz.R       2008-04-27 13:49:11.000000000 +0200
+++ R-2.7.0/src/library/grDevices/R/zzz.R.new   2008-04-27 13:59:37.000000000 +0200
@@ -22,7 +22,7 @@
     extras <- if(.Platform$OS.type == "windows")
         list(windowsTimeouts = c(100L,500L)) else
     list(bitmapType = if(capabilities("aqua")) "quartz" else if(capabilities("cairo")) "cairo" else "Xlib")
-    defdev <- Sys.getenv("R_DEFAULT_DEVICE")
+    defdev <- as.character(Sys.getenv("R_DEFAULT_DEVICE"))
     if(!nzchar(defdev)) defdev <- "pdf"
     device <- if(interactive()) {
         intdev <- Sys.getenv("R_INTERACTIVE_DEVICE")




--please do not edit the information below--

Version:
 platform = i686-pc-linux-gnu
 arch = i686
 os = linux-gnu
 system = i686, linux-gnu
 status = 
 major = 2
 minor = 7.0
 year = 2008
 month = 04
 day = 22
 svn rev = 45424
 language = R
 version.string = R version 2.7.0 (2008-04-22)

Locale:
LC_CTYPE=nl_NL at euro;LC_NUMERIC=C;LC_TIME=nl_NL at euro;LC_COLLATE=C;LC_MONETARY=C;LC_MESSAGES=nl_NL at euro;LC_PAPER=nl_NL at euro;LC_NAME=C;LC_ADDRESS=C;LC_TELEPHONE=C;LC_MEASUREMENT=nl_NL at euro;LC_IDENTIFICATION=C

Search Path:
 .GlobalEnv, package:stats, package:graphics, package:utils, package:datasets, package:grDevices, package:methods, Autoloads, package:base

______________________________________________
R-devel at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
  

O__  ---- Peter Dalgaard             ?ster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark      Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)              FAX: (+45) 35327907

R_DEFAULT_DEVICE (PR#11294)

Thread (2 messages)