@@ -, +, @@ --- about.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) --- a/about.pl +++ a/about.pl @@ -474,18 +474,18 @@ $template->param( 'bad_yaml_prefs' => \@bad_yaml_prefs ) if @bad_yaml_prefs; $bad_relationships_count = $bad_relationships_count->[0]->[0]; - my @existing_relationships = $dbh->selectall_array(q{ + my $existing_relationships = $dbh->selectall_arrayref(q{ SELECT DISTINCT(relationship) FROM ( SELECT relationship FROM borrower_relationships WHERE relationship IS NOT NULL UNION ALL SELECT relationship FROM borrowers WHERE relationship IS NOT NULL) a - }); + }, { Slice => {} }); my %valid_relationships = map { $_ => 1 } split( /,|\|/, C4::Context->preference('borrowerRelationship') ); $valid_relationships{ _bad_data } = 1; # we handle this case in another way - my @wrong_relationships = grep { !$valid_relationships{ $_->[0] } } @existing_relationships; + my @wrong_relationships = grep { !$valid_relationships{ $_->[0] } } @{$existing_relationships}; if ( @wrong_relationships or $bad_relationships_count ) { --