From f2da856d754119ee40014f4b83c046e5dc4ce5a0 Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
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 <tomascohen@theke.io>
Signed-off-by: Benjamin Rokseth <benjamin.rokseth@kul.oslo.kommune.no>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
---
 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