Attachment 111043 Details for Bug 26580 – Bug 26580: Remove unused C4::Acquisition::DelBasket function

[patch] Bug 26580: Remove unused C4::Acquisition::DelBasket function

Bug-26580-Remove-unused-C4AcquisitionDelBasket-fun.patch (text/plain), 1.79 KB, created by David Nind on 2020-10-01 13:17:47 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: David Nind

Created: 2020-10-01 13:17:47 UTC

Size: 1.79 KB

patch

obsolete

>From 4dc4d0342c94e888b4502a02e5a6ab085ac8f0f6 Mon Sep 17 00:00:00 2001
>From: Tomas Cohen Arazi <tomascohen@theke.io>
>Date: Wed, 30 Sep 2020 12:03:41 -0300
>Subject: [PATCH] Bug 26580: Remove unused C4::Acquisition::DelBasket function
>
>Bug 26577 removed the only use of it.
>
>To test:
>1. Apply this patch
>2. Run:
>   $ git grep DelBasket
>=> SUCCESS: Only finds references to DelBasketGroup
>3. Sign off :-D
>
>Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
>
>Signed-off-by: David Nind <david@davidnind.com>
>---
> C4/Acquisition.pm | 28 +---------------------------
> 1 file changed, 1 insertion(+), 27 deletions(-)
>
>diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
>index 3aff14d667..504cb3fdaf 100644
>--- a/C4/Acquisition.pm
>+++ b/C4/Acquisition.pm
>@@ -53,7 +53,7 @@ BEGIN {
>     require Exporter;
>     @ISA    = qw(Exporter);
>     @EXPORT = qw(
>-        &GetBasket &NewBasket &CloseBasket &ReopenBasket &DelBasket &ModBasket
>+        &GetBasket &NewBasket &CloseBasket &ReopenBasket &ModBasket
>         &GetBasketAsCSV &GetBasketGroupAsCSV
>         &GetBasketsByBookseller &GetBasketsByBasketgroup
>         &GetBasketsInfosByBookseller
>@@ -486,32 +486,6 @@ sub ReOpenBasketgroup {
> 
> #------------------------------------------------------------#
> 
>-
>-=head3 DelBasket
>-
>-  &DelBasket($basketno);
>-
>-Deletes the basket that has basketno field $basketno in the aqbasket table.
>-
>-=over
>-
>-=item C<$basketno> is the primary key of the basket in the aqbasket table.
>-
>-=back
>-
>-=cut
>-
>-sub DelBasket {
>-    my ( $basketno ) = @_;
>-    my $query = "DELETE FROM aqbasket WHERE basketno=?";
>-    my $dbh = C4::Context->dbh;
>-    my $sth = $dbh->prepare($query);
>-    $sth->execute($basketno);
>-    return;
>-}
>-
>-#------------------------------------------------------------#
>-
> =head3 ModBasket
> 
>   &ModBasket($basketinfo);
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 26580: 110997 | 111043 | 111331