Fix order: was forgetting to construct homes_url first

LieberInstitute · May 6, 2023 · 6421213 · 6421213
1 parent 82f45ce
commit 6421213
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/R/project_homes.R b/R/project_homes.R
@@ -57,15 +57,15 @@ project_homes <-
             }
         }
 
+        ## Construct the URL for the homes_index file
+        homes_url <-
+            paste(recount3_url, organism, "homes_index", sep = "/")
+
         url_failed <- tryCatch(
             http_error(homes_url),
             error = function(e) { return (TRUE)}
         )
 
-
-        ## Construct the URL for the homes_index file
-        homes_url <-
-            paste(recount3_url, organism, "homes_index", sep = "/")
         if (!url_failed) {
             homes_from_url <- readLines(homes_url)