Merge pull request #903 from drgrice1/bugfix/single-option-radio-or-c…

…heck-hotfix Fix the response group for single option radio or checkbox answers (hotfix).
openwebwork · Aug 10, 2023 · 5201eb8 · 5201eb8
2 parents de1a4bb + cc3a4cd
commit 5201eb8
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/lib/PGresponsegroup.pm b/lib/PGresponsegroup.pm
@@ -54,7 +54,10 @@ sub append_response {
 	if (not_null($response_label)) {
 		if (not exists($self->{responses}{$response_label})) {
 			push @{ $self->{response_order} }, $response_label;
-			$self->{responses}{$response_label} = $response_value;
+			$self->{responses}{$response_label} =
+				ref($response_value) eq 'HASH'
+				? [ map { [ $_ => $response_value->{$_} ] } keys %$response_value ]
+				: $response_value;
 		} else {
 			$self->internal_debug_message(
 				"PGresponsegroup::append_response error: there is already an answer labeled $response_label",