diff --git a/inst/HaDeX/server.R b/inst/HaDeX/server.R
index 1f656b38..45d24d4c 100644
--- a/inst/HaDeX/server.R
+++ b/inst/HaDeX/server.R
@@ -197,15 +197,7 @@ server <- function(input, output, session) {
   })
   
   ##
-  
-  stateOverlap <- reactive({
-    
-    
-    
-  })
-  
-  ##
-  
+
   stateOverlap_out <- reactive({
     
     plot_coverage(dat = dat(), chosen_state = input[["chosen_state"]]) + 
@@ -232,7 +224,7 @@ server <- function(input, output, session) {
   ##
   
   stateOverlapDist_data <- reactive({
-    
+
     dat() %>%
       select(Start, End, State, Sequence) %>%
       filter(State == input[["chosen_state"]]) %>%
@@ -260,7 +252,7 @@ server <- function(input, output, session) {
   ##
   
   stateOverlapDist <- reactive({
-    
+
     mean_coverage <- round(mean(stateOverlapDist_data()[["coverage"]], na.rm = TRUE), 2)
     display_position <- (input[["plot_range"]][[1]] + input[["plot_range"]][[2]])/2
     
diff --git a/inst/HaDeX/ui.R b/inst/HaDeX/ui.R
index 88793cd6..3c678bf5 100644
--- a/inst/HaDeX/ui.R
+++ b/inst/HaDeX/ui.R
@@ -271,7 +271,8 @@ ui <- fluidPage(theme = "HaDeX_theme.css",
                                                          label = "Correct sequence length:",
                                                          value = 300, 
                                                          step = 1),
-                                            h5("If C-term is not covered, enter correct value."),
+                                            h5("If C-terminal of is not covered by peptides, 
+                                               enter its correct position."),
                                             textOutput("sequence_length_exp_info")
                                      )
                                    )