---
 acqui/basket.pl |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/acqui/basket.pl b/acqui/basket.pl
index 5947b0b..cd67046 100755
--- a/acqui/basket.pl
+++ b/acqui/basket.pl
@@ -288,6 +288,7 @@ if ( $op eq 'delete_confirm' ) {
        my $total_est_gste = $total_rrp_gste - ($total_rrp_gste * $discount);
 
     my $contract = &GetContract($basket->{contractnumber});
+    my @orders = GetOrders($basketno);
     $template->param(
         basketno             => $basketno,
         basketname           => $basket->{'basketname'},
@@ -317,6 +318,7 @@ if ( $op eq 'delete_confirm' ) {
         GST                  => $gist,
         basketgroups         => $basketgroups,
         grouped              => $basket->{basketgroupid},
+        unclosable           => @orders ? 0 : 1, 
     );
 }
 
-- 
1.6.3.3

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches

Reply via email to