Bug 36122: NEW_SUGGESTION is sent for every modification to the suggestion
Signed-off-by: Roman Dolny <roman.dolny@jezuici.pl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit 4ab5e6d29d
)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
8ff2b5b29a
commit
866e1269b2
1 changed files with 1 additions and 2 deletions
|
@ -69,8 +69,7 @@ sub store {
|
|||
my $emailpurchasesuggestions = C4::Context->preference("EmailPurchaseSuggestions");
|
||||
|
||||
my $result = $self->SUPER::store();
|
||||
|
||||
if( $emailpurchasesuggestions ){
|
||||
if ( $emailpurchasesuggestions && $self->STATUS eq 'ASKED' ) {
|
||||
|
||||
if (
|
||||
my $letter = C4::Letters::GetPreparedLetter(
|
||||
|
|
Loading…
Reference in a new issue