Fixed table column renaming on empty frames

sassoftware · May 22, 2023 · 7000ab6 · 7000ab6
1 parent 28903dc
commit 7000ab6
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/rswat_rest.R b/R/rswat_rest.R
@@ -174,8 +174,9 @@ REST_CASTable <- setRefClass(
             out <- do.call(rbind.data.frame, out)
 
             if (length(names(out)) > 0 ) {
-            names(out) <- col.names
+              names(out) <- col.names
             }
+
             return( out )
         },