Bug 11897: (QA follow-up) Remove rebase leftover

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

diff --git a/Koha/Item.pm b/Koha/Item.pm
index 721c0d6..f3799ef 100644 (file)
--- a/Koha/Item.pm
+++ b/Koha/Item.pm
@@ -42,7 +42,7 @@ Koha::Item - Koha Item object class
 
 =head1 API
 
-=head2 Class Methods
+=head2 Class methods
 
 =cut
 
@@ -315,19 +315,7 @@ sub add_to_rota {
     return $self;
 }
 
-=head3 biblio
-
-  my $biblio = $item->biblio;
-
-Returns the biblio associated with the current item.
-
-=cut
-
-sub biblio {
-    my ( $self ) = @_;
-    my $rs = $self->_result->biblio;
-    return Koha::Biblio->_new_from_dbic( $rs );
-}
+=head2 Internal methods
 
 =head3 _type
 

diff --git a/Koha/Library.pm b/Koha/Library.pm
index 7877174..f1a5597 100644 (file)
--- a/Koha/Library.pm
+++ b/Koha/Library.pm
@@ -36,43 +36,6 @@ Koha::Library - Koha Library Object class
 
 =head2 Class methods
 
-=head3 get_categories
-
-TODO: Ask the author to add a proper description
-
-=cut
-
-sub get_categories {
-    my ( $self, $params ) = @_;
-    # TODO This should return Koha::LibraryCategories
-    return $self->{_result}->categorycodes( $params );
-}
-
-=head3 update_categories
-
-TODO: Ask the author to add a proper description
-
-=cut
-
-sub update_categories {
-    my ( $self, $categories ) = @_;
-    $self->_result->delete_related( 'branchrelations' );
-    $self->add_to_categories( $categories );
-}
-
-=head3 add_to_categories
-
-TODO: Ask the author to add a proper description
-
-=cut
-
-sub add_to_categories {
-    my ( $self, $categories ) = @_;
-    for my $category ( @$categories ) {
-        $self->_result->add_to_categorycodes( $category->_result );
-    }
-}
-
 =head3 stockrotationstages
 
   my $stages = Koha::Library->stockrotationstages;