Update digestR.R

DDesmonts · web-flow · commit 6948fb63aae7 · 2024-09-24T16:44:26.000-06:00
diff --git a/R/digestR.R b/R/digestR.R
@@ -19054,6 +19054,7 @@ addGeneListboxAboveThreshold <- function() {
   # Set focus on the listbox window
   tkfocus(geneDialog)
 }
+displayGeneButton <- ttkbutton(genePlotTypeFrame, text='Display Single Gene', width=21, command=onDisplayGene)
 	
 	onDisplayProteome <- function()
 	{

Original file line number	Diff line number	Diff line change
`@@ -19054,6 +19054,7 @@ addGeneListboxAboveThreshold <- function() {`
`19054`	`19054`	`# Set focus on the listbox window`
`19055`	`19055`	`tkfocus(geneDialog)`
`19056`	`19056`	`}`
	`19057`	`+displayGeneButton <- ttkbutton(genePlotTypeFrame, text='Display Single Gene', width=21, command=onDisplayGene)`
`19057`	`19058`
`19058`	`19059`	`onDisplayProteome <- function()`
`19059`	`19060`	`{`