diff options
| -rw-r--r-- | inst/GUI/mkinGUI.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/inst/GUI/mkinGUI.R b/inst/GUI/mkinGUI.R index 0bfe175..fb8f22a 100644 --- a/inst/GUI/mkinGUI.R +++ b/inst/GUI/mkinGUI.R @@ -694,7 +694,7 @@ delete.fit.gb <- gbutton("Delete", handler = function(h, ...) { f[[f.cur]] <<- NULL
s[[f.cur]] <<- NULL
}
- if(length(f) > 1) {
+ if (length(f) > 0) {
names(f) <<- as.character(1:length(f))
names(s) <<- as.character(1:length(f))
update_f.df()
|