From 0086e5627d674a7ea7debf5d6e94e747d927d831 Mon Sep 17 00:00:00 2001 From: Matt Smith Date: Tue, 26 Nov 2024 13:32:21 +0000 Subject: [PATCH 1/2] added job name to get_slurm_jobs output tibble. Confirmed works on slurm 23.02.4 and slurm 23.11.7 --- R/get-jobs.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/R/get-jobs.R b/R/get-jobs.R index 7fa8d2a..74ed6c3 100644 --- a/R/get-jobs.R +++ b/R/get-jobs.R @@ -31,6 +31,7 @@ parse_job_to_row <- function(job) { tibble::tibble( job_id = job$job_id, job_state = job_state, + job_name = job$name, cpus = job$cpus$number, partition = job$partition, standard_input = job$standard_input, @@ -55,6 +56,7 @@ parse_jobs_json <- function(.json) { empty <- tibble::tibble( job_id = "", job_state = "", + job_name = "", cpus = "", partition = "", standard_input = "", @@ -105,7 +107,7 @@ get_slurm_jobs <- function(user = NULL){ ) res_df <- res_df %>% - dplyr::select("job_id", "partition", "user_name", "job_state", "time", dplyr::everything()) + dplyr::select("job_id", "partition", "job_name", "user_name", "job_state", "time", "cpus", dplyr::everything()) if (!is.null(user)) { df <- tryCatch( From d0a0d978e13122e62a7ef759d425fda9dbc60ec6 Mon Sep 17 00:00:00 2001 From: "Matthew D. Smith" <47441066+mduncans@users.noreply.github.com> Date: Tue, 26 Nov 2024 08:34:20 -0500 Subject: [PATCH 2/2] Update DESCRIPTION --- DESCRIPTION | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 4842af2..25213f6 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: slurmtools Title: slurm tooling -Version: 0.0.0.9004 +Version: 0.0.0.9005 Authors@R: c(person("Devin", "Pastoor", , "devin@a2-ai.com", role = c("aut", "cre")), person("Jenna", "Elwing", email = "jenna@a2-ai.com", role = "aut"), person("Matthew", "Smith", email = "matthews@a2-ai.com", role = "aut"))