From b85eb94988f28eb2a096c377470f39e752e466d0 Mon Sep 17 00:00:00 2001 From: jranke Date: Mon, 14 Oct 2013 15:52:08 +0000 Subject: - set svn keyword for Id tag in simple.R - set initial foldlevel for two files to 0 git-svn-id: svn+ssh://svn.r-forge.r-project.org/svnroot/kinfit/pkg/mkin@114 edb9625f-4e0d-4859-8d74-9fd3b1da38cb --- inst/GUI/simple.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/inst/GUI/simple.R b/inst/GUI/simple.R index d3adcadc..ab9d8d90 100644 --- a/inst/GUI/simple.R +++ b/inst/GUI/simple.R @@ -211,13 +211,13 @@ m.gtable <- gtable(m.df, multiple = TRUE, cont = dsm) addHandlerDoubleClick(m.gtable, m.switcher) size(m.gtable) <- list(columnWidths = c(40, 200)) -# Section for selecting datasets and model +# Section for selecting datasets and model {{{2 dsmsel <- gvbox(cont = dsm) ds_plot_handler <- function(h, ...) { ds.sel <- svalue(ds.gtable) n.ds.sel <- length(ds.sel) for (i in 1:n.ds.sel) { - prows[[i]] <- ggroup(cont = pfv) + prows[[i]] <<- ggroup(cont = pfv) d <- ds[[ds.sel[[i]]]] f <- tempfile() @@ -517,4 +517,4 @@ prows <- plots <- list() # use.codemirror = TRUE) #} # 1}}} -# vim: set foldmethod=marker ts=2 sw=2 expandtab: +# vim: set foldmethod=marker foldlevel=0 ts=2 sw=2 expandtab: -- cgit v1.2.1