diff --git a/lib/WebGUI/Asset/Wobject/Survey/ResponseJSON.pm b/lib/WebGUI/Asset/Wobject/Survey/ResponseJSON.pm index 6a2b5ccd7..844e9b635 100644 --- a/lib/WebGUI/Asset/Wobject/Survey/ResponseJSON.pm +++ b/lib/WebGUI/Asset/Wobject/Survey/ResponseJSON.pm @@ -918,7 +918,7 @@ sub responseValues { # Find out what we're indexing responses by my $identifier = $opts{indexBy} eq 'variable' ? $question && $question->{variable} - : $self->questionId($address); + : $self->questionId(@address); next unless $identifier; my $answer = $self->survey->answer([@address]);