From f2da856d754119ee40014f4b83c046e5dc4ce5a0 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Wed, 31 Aug 2016 20:21:12 -0300 Subject: [PATCH] Bug 14868: (QA followup) POD fixes To make the QA scripts happy, the POD needed a fix, and also keys applied to a hashref needs to be avoided. Signed-off-by: Tomas Cohen Arazi Signed-off-by: Benjamin Rokseth Signed-off-by: Kyle M Hall --- Koha/REST/V1.pm | 16 +++++++++++++++- 1 file changed, 15 insertions(+), 1 deletion(-) diff --git a/Koha/REST/V1.pm b/Koha/REST/V1.pm index 4509819b0c..591c584dd2 100644 --- a/Koha/REST/V1.pm +++ b/Koha/REST/V1.pm @@ -26,6 +26,20 @@ use Koha::Holds; use Koha::OldIssues; use Koha::Patrons; +=head1 NAME + +Koha::REST::V1 - Main v.1 REST api class + +=head1 API + +=head2 Class Methods + +=head3 startup + +Overloaded Mojolicious->startup method. It is called at application startup. + +=cut + sub startup { my $self = shift; @@ -167,7 +181,7 @@ sub check_object_ownership { reserve_id => \&_object_ownership_by_reserve_id, }; - foreach my $param (keys $parameters) { + foreach my $param ( keys %{ $parameters } ) { my $check_ownership = $parameters->{$param}; if ($c->stash($param)) { return &$check_ownership($c, $user, $c->stash($param)); -- 2.39.5