diff options
| author | Alexander_Kabui | 2024-10-29 20:52:46 +0300 |
|---|---|---|
| committer | Alexander_Kabui | 2024-10-29 20:52:46 +0300 |
| commit | 4667ea4675f2ec3f545c5376a4f942ae2d9615d7 (patch) | |
| tree | 744561a0059fbef1d803566b17ea4627908371da /scripts | |
| parent | 4c303f6c43173c1b87f6f675b1db865f4c25a7b0 (diff) | |
| download | genenetwork3-4667ea4675f2ec3f545c5376a4f942ae2d9615d7.tar.gz | |
Refactor: remove hardcoded dir_path for control files.
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/rqtl2_wrapper.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/rqtl2_wrapper.R b/scripts/rqtl2_wrapper.R index ab3fa3e..f71fb08 100644 --- a/scripts/rqtl2_wrapper.R +++ b/scripts/rqtl2_wrapper.R @@ -66,7 +66,7 @@ genRandomFileName <- function(prefix, file_ext = ".txt") { # TODO create temp directory for this workspace pass this as argument -control_file_path <- file.path("/home/kabui", +control_file_path <- file.path(opt$directory, genRandomFileName(prefix = "control_", file_ext = ".json")) str_glue("Generated control file path is {control_file_path}") |