From 51a39c07be2f563f80cf5a5ffa57dd4e5ad097ea Mon Sep 17 00:00:00 2001
From: Morris Jette <jette@schedmd.com>
Date: Fri, 25 Aug 2017 08:21:41 -0600
Subject: [PATCH] Fix perl API for sbcast pack job support

---
 contribs/perlapi/libslurm/perl/Slurm.xs | 4 +++-
 doc/html/heterogeneous_jobs.shtml       | 6 ++++--
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/contribs/perlapi/libslurm/perl/Slurm.xs b/contribs/perlapi/libslurm/perl/Slurm.xs
index 978e6e3b86d..040fa46e95b 100644
--- a/contribs/perlapi/libslurm/perl/Slurm.xs
+++ b/contribs/perlapi/libslurm/perl/Slurm.xs
@@ -581,13 +581,15 @@ slurm_sbcast_lookup(slurm_t self, uint32_t job_id, uint32_t step_id)
 	PREINIT:
 		job_sbcast_cred_msg_t *info;
 		int rc;
+		uint32_t pack_job_offset = NO_VAL;
 	CODE:
 		if (self); /* this is needed to avoid a warning about
 			      unused variables.  But if we take slurm_t self
 			      out of the mix Slurm-> doesn't work,
 			      only Slurm::
 			    */
-		rc = slurm_sbcast_lookup(job_id, step_id, &info);
+		rc = slurm_sbcast_lookup(job_id, pack_job_offset, step_id,
+					 &info);
 		if (rc == SLURM_SUCCESS) {
 			RETVAL = newHV();
 			sv_2mortal((SV*)RETVAL);
diff --git a/doc/html/heterogeneous_jobs.shtml b/doc/html/heterogeneous_jobs.shtml
index 8c40978988c..69de23cf4c2 100644
--- a/doc/html/heterogeneous_jobs.shtml
+++ b/doc/html/heterogeneous_jobs.shtml
@@ -474,6 +474,8 @@ components of a heterogeneous job.</p>
 
 <p>Heterogeneous jobs are not supported on IBM PE systems.</p>
 
+<p>Slurm's PERL APIs currently do not support heterogeneous jobs.</p>
+
 <h2><a name="sys_admin">System Administrator Information</a></h2>
 
 <p>The job submit plugin is invoked independently for each component of a
@@ -543,13 +545,13 @@ core, socket or node.
 Each component of a heterogeneous job counts as a "job" with respect to
 resource limits.</p>
 
-For example, a user might have a limit of 2 concurrent running jobs and submit
+<p>For example, a user might have a limit of 2 concurrent running jobs and submit
 a heterogeneous job with 3 components.
 Such a situation will have an adverse effect upon scheduling other jobs,
 especially other heterogeneous jobs.</p>
 
 <p class="footer"><a href="#top">top</a></p>
 
-<p style="text-align:center;">Last modified 24 August 2017</p>
+<p style="text-align:center;">Last modified 25 August 2017</p>
 
 <!--#include virtual="footer.txt"-->
-- 
GitLab