moved common line of code out of if/else

USGS-R · Jun 24, 2016 · 51558d5 · 51558d5
1 parent c552188
commit 51558d5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/utils-json.R b/R/utils-json.R
@@ -193,11 +193,11 @@ getApprovals <- function(data, chain_nm, legend_nm, appr_var_all, month=NULL, po
     for(i in seq_along(date_index_list)){
       d <- date_index_list[[i]]
 
+      applicable_dates <- points[['time']][d]
+
       if(isDV){
-        applicable_dates <- points[['time']][d]
         applicable_values <- points[['value']][d]
       } else {
-        applicable_dates <- points[['time']][d]
         applicable_values <- substitute(getYvals_approvals(plot_object, length(applicable_dates)))
       }