From 04def8dc34c5557dd62b903e3249e5f5e98f289c Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Thu, 28 Aug 2014 16:03:44 +0200 Subject: Initial message to explain target input field in model editor Thanks to Denis Weber for pointing out the need for this --- NEWS.md | 2 ++ inst/GUI/gmkin.R | 8 ++++++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/NEWS.md b/NEWS.md index 235a3d7..0eeb94d 100644 --- a/NEWS.md +++ b/NEWS.md @@ -10,6 +10,8 @@ - Option to show the fitting process in a separate plot device, default is not to +- Add an inital message explaining the use of the target input box of the model editor + ## BUG FIXES - Sorting in the fit table now works correctly also for more than 9 fits diff --git a/inst/GUI/gmkin.R b/inst/GUI/gmkin.R index f18f744..c85d660 100644 --- a/inst/GUI/gmkin.R +++ b/inst/GUI/gmkin.R @@ -557,7 +557,9 @@ add_observed_handler <- function(h, ...) { cont = m.e.rows[[obs.i]]) svalue(m.e.type[[obs.i]]) <- "SFO" glabel("to", cont = m.e.rows[[obs.i]]) - m.e.to[[obs.i]] <<- gedit("", width = 40, cont = m.e.rows[[obs.i]]) + m.e.to[[obs.i]] <<- gedit("", + initial.msg = "Optional list of target variables, e.g. 'm1, m2'", + width = 40, cont = m.e.rows[[obs.i]]) m.e.sink[[obs.i]] <<- gcheckbox("Path to sink", checked = TRUE, cont = m.e.rows[[obs.i]]) gbutton("Remove compound", handler = remove_compound_handler, @@ -622,7 +624,9 @@ show_m_spec <- function() { glabel("to", cont = m.e.rows[[obs.i]]) obs.to <<- ifelse(is.null(m[[m.cur]]$spec[[obs.i]]$to), "", paste(m[[m.cur]]$spec[[obs.i]]$to, collapse = ", ")) - m.e.to[[obs.i]] <<- gedit(obs.to, width = 40, cont = m.e.rows[[obs.i]]) + m.e.to[[obs.i]] <<- gedit(obs.to, + initial.msg = "Optional list of target variables, e.g. 'm1, m2'", + width = 40, cont = m.e.rows[[obs.i]]) m.e.sink[[obs.i]] <<- gcheckbox("Path to sink", checked = m[[m.cur]]$spec[[obs.i]]$sink, cont = m.e.rows[[obs.i]]) if (obs.i > 1) { -- cgit v1.2.1