Merge pull request openwebwork#1028 from Alex-Jordan/NchooseK

force list context when random_subset used in dprecated macros
drgrice1 · Mar 13, 2024 · d2bead5 · d2bead5
2 parents a9d9280 + 9a365cc
commit d2bead5
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/macros/ui/PGchoicemacros.pl b/macros/ui/PGchoicemacros.pl
@@ -793,7 +793,9 @@ sub invert {
 
 sub NchooseK {
 	my ($n, $k) = @_;
-	return random_subset($k, 0 .. $n - 1);
+	# force list context
+	my @return = random_subset($k, 0 .. $n - 1);
+	return @return;
 }
 
 =item [DEPRECATED] shuffle()
@@ -808,7 +810,9 @@ sub NchooseK {
 
 sub shuffle {
 	my ($i) = @_;
-	return random_subset($i, 0 .. $i - 1);
+	# force list context
+	my @return = random_subset($i, 0 .. $i - 1);
+	return @return;
 }
 
 =item [DEPRECATED] match_questions_list()