Browse Source

Adding Optionnal suggestion creation when renewing subscription.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
3.0.x
Henri-Damien LAURENT 16 years ago
committed by Joshua Ferraro
parent
commit
20b72f1253
  1. 18
      C4/Serials.pm

18
C4/Serials.pm

@ -1428,14 +1428,16 @@ sub ReNewSubscription {
my $sth = $dbh->prepare($query);
$sth->execute( $subscription->{biblionumber} );
my $biblio = $sth->fetchrow_hashref;
NewSuggestion(
$user, $subscription->{bibliotitle},
$biblio->{author}, $biblio->{publishercode},
$biblio->{note}, '',
'', '',
'', '',
$subscription->{biblionumber}
);
if (C4::Context->preference("RenewSerialAddsSuggestion")){
NewSuggestion(
$user, $subscription->{bibliotitle},
$biblio->{author}, $biblio->{publishercode},
$biblio->{note}, '',
'', '',
'', '',
$subscription->{biblionumber}
);
}
# renew subscription
$query = qq|

Loading…
Cancel
Save