From 95fcc1b61c9e6b168e417f2993b5251005af9287 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Wed, 1 Mar 2017 01:20:02 +0000 Subject: [PATCH] Bug 14576 (QA Followup) Remove C4:::Items::ShelfToCart --- C4/Items.pm | 22 ---------------------- 1 file changed, 22 deletions(-) diff --git a/C4/Items.pm b/C4/Items.pm index 50f7b25..6ac430c 100644 --- a/C4/Items.pm +++ b/C4/Items.pm @@ -88,7 +88,6 @@ BEGIN { GetLatestAcquisitions CartToShelf - ShelfToCart GetAnalyticsCount @@ -203,27 +202,6 @@ sub CartToShelf { } } -=head2 ShelfToCart - - ShelfToCart($itemnumber); - -Set the current shelving location of the item -to shelving cart ('CART'). - -=cut - -sub ShelfToCart { - my ( $itemnumber ) = @_; - - unless ( $itemnumber ) { - croak "FAILED ShelfToCart() - no itemnumber supplied"; - } - - my $item = GetItem($itemnumber); - $item->{'location'} = 'CART'; - ModItem($item, undef, $itemnumber); -} - =head2 AddItemFromMarc my ($biblionumber, $biblioitemnumber, $itemnumber) -- 2.1.4