From 3bcba795f5b1fe7532cf4d4caeb2732748922fa2 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
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 a843b25..14afb76 100644
--- a/C4/Items.pm
+++ b/C4/Items.pm
@@ -89,7 +89,6 @@ BEGIN {
     GetLatestAcquisitions
 
         CartToShelf
-        ShelfToCart
 
 	GetAnalyticsCount
         GetItemHolds
@@ -205,27 +204,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