fix filename verbose output

bluegreen-labs · Jan 17, 2025 · 805226f · 805226f
1 parent 6814c80
commit 805226f
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/R/wf_request.R b/R/wf_request.R
@@ -122,8 +122,8 @@ wf_request <- function(
             service_info$user)
   }
 
-  # grab filename
-  filename <- file.path(path, request$target)
+  # grab filename for verbose output
+  filename <- request$target
 
   # Create request and submit to service
   request <- ds_service$new(
@@ -159,7 +159,7 @@ wf_request <- function(
         exit_message(
           request$get_url(),
           path,
-          request$target,
+          filename,
           service_info$service
         )
       }
@@ -171,7 +171,7 @@ wf_request <- function(
       exit_message(
         request$get_url(),
         path,
-        request$target,
+        filename,
         service_info$service
       )
     }