Merge pull request #47 from pinduzera/main

Fix Issue #46 dataStep action failing on Rest Protocol
sassoftware · Jun 5, 2023 · 8d12746 · 8d12746
2 parents fd11e33 + 7000ab6
commit 8d12746
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/R/rswat_rest.R b/R/rswat_rest.R
@@ -172,8 +172,11 @@ REST_CASTable <- setRefClass(
             # Convert rows of data to data.frame
             out$stringsAsFactors = FALSE
             out <- do.call(rbind.data.frame, out)
-            names(out) <- col.names
-
+
+            if (length(names(out)) > 0 ) {
+              names(out) <- col.names
+            }
+
             return( out )
         },