From 33d4367cd81ad79f267583644d6b9b694b518bac Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Fri, 30 Jul 2021 16:25:04 +0200
Subject: [PATCH] Bug 27526: Add missing POD

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 Koha/Biblio.pm |  8 ++++++++
 Koha/Item.pm   | 10 ++++++++++
 2 files changed, 18 insertions(+)

diff --git a/Koha/Biblio.pm b/Koha/Biblio.pm
index 6bce5b4008..1cd6229458 100644
--- a/Koha/Biblio.pm
+++ b/Koha/Biblio.pm
@@ -421,6 +421,14 @@ sub items {
     return Koha::Items->_new_from_dbic( $items_rs );
 }
 
+=head3 host_items
+
+my $host_items = $biblio->host_items();
+
+Return the host items (easy analytical record)
+
+=cut
+
 sub host_items {
     my ($self) = @_;
 
diff --git a/Koha/Item.pm b/Koha/Item.pm
index 6e2985d23a..c258259804 100644
--- a/Koha/Item.pm
+++ b/Koha/Item.pm
@@ -940,6 +940,16 @@ sub cover_images {
     return Koha::CoverImages->_new_from_dbic($cover_image_rs);
 }
 
+=head3 columns_to_str
+
+    my $values = $items->columns_to_str;
+
+Return a hashref with the string representation of the different attribute of the item.
+
+This is meant to be used for display purpose only.
+
+=cut
+
 sub columns_to_str {
     my ( $self ) = @_;
 
-- 
2.39.5