NOEL Yvonnick <yvonnick.noel <at> free.fr> writes: > > Hello, ... > I can reproduce the error by using the first example in the gtable help > file: > > m <- getCRANmirrors()[,c(1,4)] > setCRAN <- function(URL) { ## see chooseCRANmirror > repos = getOption("repos") > repos["CRAN"] <- gsub("/$", "", URL) > options(repos=repos) > } > w <- gwindow("gtable example",width=400) > gp = ggroup(horizontal=FALSE, cont=w) > tab <- gtable(m, chosencol = 2, cont=gp, expand=TRUE, > handler = function(h,...) setCRAN(svalue(h$obj))) > bg <- ggroup(cont=gp) > addSpring(bg) > gbutton("dismiss", cont=bg, handler = function(h,...) dispose(w)) y> > Then, selecting one of the elements, and trying to get access to the > gtable value, I get: > > > svalue(tab) > Error in function (classes, fdef, mtable) : > unable to find an inherited method for function ".svalue", for > signature "gGridRGtk", "guiWidgetsToolkitRGtk2", "NULL", "NULL" > > Is this a problem related to the recent redefinition of the svalue > method as generic? > > Thanks a lot, > > Yvonnick Noel, PhD > University of Brittany at Rennes, France >
Hi, I don't see this problem with my version of RGtk2. Can you email me offline with your version of gWidgets, gWidgetsRgtk2 and R so I can check?I did make a minor change to .svalue as there was a mistake in the signature. It may have introduced the error you see. --John _______________________________________________ R-SIG-GUI mailing list R-SIG-GUI@stat.math.ethz.ch https://stat.ethz.ch/mailman/listinfo/r-sig-gui