diff --git a/NEWS b/NEWS
index a9efdcb5b93c4ce1da8f9f8d9f46522f4570cd91..0359a6e93cb00a035ae3b991ae489dbeaf811ef6 100644
--- a/NEWS
+++ b/NEWS
@@ -194,6 +194,8 @@ documents those changes that are of interest to users and admins.
  -- Added partition default_time field to job_submit LUA plugin. Patch by
     Remi Palancher.
  -- Fix bug in cray/srun wrapper stdin/out/err file handling.
+ -- In cray/srun wrapper, only include aprun "-q" option when srun "--quiet"
+    option is used.
 
 * Changes in SLURM 2.3.3
 ========================
diff --git a/contribs/cray/srun.pl b/contribs/cray/srun.pl
index 3ad7a8a2f26c30c36ff033c7b82b937fb2e4b27d..0fe21a178c7918add623517d8e32c07e22b226bf 100755
--- a/contribs/cray/srun.pl
+++ b/contribs/cray/srun.pl
@@ -55,7 +55,6 @@ my (	$account,
 	$acctg_freq,
 	$alps,
 	$aprun_line_buf,
-	$aprun_quiet,
 	$begin_time,
 	$chdir,
 	$check_time,
@@ -147,7 +146,6 @@ my $srun   = "BINDIR/srun";
 
 my $have_job;
 $aprun_line_buf = 1;
-$aprun_quiet = 1;
 $have_job = 0;
 
 foreach (keys %ENV) {
@@ -416,7 +414,7 @@ if ($have_job == 0) {
 		if (index($alps, "-m") >= 0)  { $memory_per_cpu = 0 };
 		if (index($alps, "-n") >= 0)  { $num_tasks = 0; $num_nodes = 0; }
 		if (index($alps, "-N") >= 0)  { $ntasks_per_node = 0; $num_nodes = 0; }
-		if (index($alps, "-q") >= 0)  { $aprun_quiet = 0 };
+		if (index($alps, "-q") >= 0)  { $quiet = 0 };
 		if (index($alps, "-S") >= 0)  { $ntasks_per_socket = 0 };
 		if (index($alps, "-sn") >= 0) { $sockets_per_node = 0 };
 		if (index($alps, "-ss") >= 0) { $memory_bind = 0 };
@@ -455,7 +453,7 @@ if ($have_job == 0) {
 		$command .= " -n $num_nodes";
 	}
 
-	$command .= " -q"					if $aprun_quiet;
+	$command .= " -q"					if $quiet;
 	# $command .= " -r"		no srun equivalent, core specialization
 	$command .= " -S $ntasks_per_socket" 			if $ntasks_per_socket;
 	# $command .= " -sl"		no srun equivalent, task placement on nodes