From d344860c84af3f77679a4c6931db1c40e824fa99 Mon Sep 17 00:00:00 2001
From: Moe Jette <jette1@llnl.gov>
Date: Mon, 4 Feb 2008 18:33:28 +0000
Subject: [PATCH] update perl api for change in allocate RPCs

---
 contribs/perlapi/libslurm-perl/alloc.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/contribs/perlapi/libslurm-perl/alloc.c b/contribs/perlapi/libslurm-perl/alloc.c
index e98ed7f8e36..4cc832968a4 100644
--- a/contribs/perlapi/libslurm-perl/alloc.c
+++ b/contribs/perlapi/libslurm-perl/alloc.c
@@ -61,7 +61,6 @@ hv_to_job_desc_msg(HV* hv, job_desc_msg_t* job_desc_msg)
 	FETCH_FIELD(hv, job_desc_msg, job_min_cores, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, job_min_threads, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, job_min_memory, uint16_t, FALSE);
-	FETCH_FIELD(hv, job_desc_msg, job_max_memory, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, job_min_tmp_disk, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, partition, charp, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, priority, uint32_t, FALSE);
@@ -115,7 +114,7 @@ hv_to_job_desc_msg(HV* hv, job_desc_msg_t* job_desc_msg)
 	FETCH_FIELD(hv, job_desc_msg, resp_host, charp, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, alloc_resp_port, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, other_port, uint16_t, FALSE);
-	FETCH_FIELD(hv, job_desc_msg, dependency, uint32_t, FALSE);
+	FETCH_FIELD(hv, job_desc_msg, dependency, charp, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, overcommit, uint16_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, num_tasks, uint32_t, FALSE);
 	FETCH_FIELD(hv, job_desc_msg, nice, uint16_t, FALSE);
-- 
GitLab