Thanks for your work on this topic, Marc, but the bug has already been
fixed by Brian 4 days ago (see below).
Uwe
========
r33976 | ripley | 2005-04-19 05:38:51 -0400 (Tue, 19 Apr 2005) | 1 line
Changed paths:
M /trunk/NEWS
M /trunk/src/library/utils/R/menu.R
missing braces
========
Marc Schwartz wrote:
Hi all,
In follow up to my message earlier, I spent some time applying the
modification to the menu() function that I referenced earlier. I also
recompiled a local copy of R on my FC3 system using:
./configure --without-tcltk
This results in:
capabilities()
jpeg png tcltk X11 http/ftp sockets libxml fifo
TRUE TRUE FALSE TRUE TRUE TRUE TRUE TRUE
cledit IEEE754 iconv
TRUE TRUE TRUE
The first time around, I ran the menu() function unchanged and got the
same error that Scott and Manuel reported earlier:
Error in inherits(x, "factor") : Object "res" not found
'res' is the value returned from the tcltk function tk.select.list()
used in menu().
This appeared for the series of functions that call menu(), such as
update.packages(), install.packages(), chooseCRANmirror(), contrib.url
(), etc.
After modifying the menu function, I was able to get:
install.packages("rgenoud")
--- Please select a CRAN mirror for use in this session ---
CRAN mirror
1: Australia 2: Austria
3: Brasil (PR) 4: Brasil (MG)
5: Brasil (SP 1) 6: Brasil (SP 2)
7: Canada (BC) 8: Canada (ON)
9: Denmark 10: France (Toulouse)
11: France (Lyon) 12: France (Paris)
13: Germany (Berlin) 14: Germany (Koeln)
15: Germany (Mainz) 16: Germany (Muenchen)
17: Hungary 18: Italy (Arezzo)
19: Italy (Ferrara) 20: Japan (Aizu)
21: Japan (Tsukuba) 22: Poland
23: Portugal 24: Slovenia (Besnica)
25: Slovenia (Ljubljana) 26: South Africa
27: Spain 28: Switzerland (Zuerich)
29: Switzerland (Bern 1) 30: Switzerland (Bern 2)
31: Turkey 32: Taiwan
33: UK (Bristol) 34: UK (London)
35: USA (CA 1) 36: USA (CA 2)
37: USA (MA) 38: USA (MI)
39: USA (NC) 40: USA (PA 1)
41: USA (PA 2) 42: USA (WA)
Selection:
So, with the modification in menu() and without tcltk available, the
text menu now comes up properly.
The proposed patch for .../src/library/utils/menu.R is attached.
HTH,
Marc Schwartz
------------------------------------------------------------------------
--- R-2.1.0/src/library/utils/R/menu.R 2005-04-18 05:18:57.000000000 -0500
+++ R-2.1.0-patch/src/library/utils/R/menu.R 2005-04-22 22:08:23.000000000 -0500
@@ -6,9 +6,10 @@
res <- select.list(choices, multiple=FALSE, title=title)
return(match(res, choices, nomatch = 0))
} else if(.Platform$OS.type == "unix"
- && capabilities("tcltk") && capabilities("X11"))
+ && capabilities("tcltk") && capabilities("X11")) {
res <- tcltk::tk_select.list(choices, multiple=FALSE, title=title)
return(match(res, choices, nomatch = 0))
+ }
}
nc <- length(choices)
if(length(title) && nchar(title[1])) cat(title[1], "\n")
------------------------------------------------------------------------
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
