Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

bug 2915 followup - small efficiency improvement

Browse source 
Following up on a suggestion by Joe Atzberger, save
a database query by not counting the subscriptions
to delete; instead, simply fetch a list of them.

No user-visible change.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
This commit is contained in:
Galen Charlton 2009-04-27 10:31:03 -05:00
parent 46037ac61a
commit a2b1922b66
1 changed files with 3 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
C4/Biblio.pm
View file

@ -379,11 +379,9 @@ sub DelBiblio {
return $error if $error;
# We delete attached subscriptions
if(C4::Serials::CountSubscriptionFromBiblionumber($biblionumber) != 0){
my $subscriptions = &C4::Serials::GetFullSubscriptionsFromBiblionumber($biblionumber);
foreach my $subscription (@$subscriptions){
&C4::Serials::DelSubscription($subscription->{subscriptionid});
}
my $subscriptions = &C4::Serials::GetFullSubscriptionsFromBiblionumber($biblionumber);
foreach my $subscription (@$subscriptions){
&C4::Serials::DelSubscription($subscription->{subscriptionid});
}
# Delete in Zebra. Be careful NOT to move this line after _koha_delete_biblio