Correct roxygen documentations

Signed-off-by: Abhinav Pandey <[email protected]>

base/db/R/get.machine.info.R

@@ -1,6 +1,6 @@
 #' Get machine information from db
 #' @param host host information
-#' @param dbfile.id dbfile id for existing records
+#' @param input.args input args.r for existing records
 #' @param input.id input id for existing records
 #' @param con database connection
 #' 

base/db/tests/testthat/test.check.missing.files.R

@@ -14,12 +14,11 @@ test_that("`check_missing_files()` able to return correct missing files", {
     # This function returns a list as follows: return(list(result_sizes, outlist, existing.input, existing.dbfile))
     # Perform checks to compare results from stubbed functions to actual results
     expect_equal(nrow(res[[1]]), 1)
-    PEcAn.logger::logger.debug(res)
-    # expect_equal(res[[1]]$missing, FALSE)
-    # expect_equal(res[[1]]$empty, FALSE)
-    # expect_equal(res[[2]], "test")
-    # expect_equal(nrow(res[[3]][[1]]), 0)
-    # expect_equal(ncol(res[[3]][[1]]), 0)
-    # expect_equal(nrow(res[[4]][[1]]), 0)
-    # expect_equal(ncol(res[[4]][[1]]), 0)
+    expect_equal(res[[1]]$missing, FALSE)
+    expect_equal(res[[1]]$empty, FALSE)
+    expect_equal(res[[2]], "test")
+    expect_equal(nrow(res[[3]][[1]]), 0)
+    expect_equal(ncol(res[[3]][[1]]), 0)
+    expect_equal(nrow(res[[4]][[1]]), 0)
+    expect_equal(ncol(res[[4]][[1]]), 0)
 })