|
Lines 544-554
sub ModSuggestion {
Link Here
|
| 544 |
} |
544 |
} |
| 545 |
|
545 |
|
| 546 |
my $rs = Koha::Database->new->schema->resultset('Suggestion')->find($suggestion->{suggestionid}); |
546 |
my $rs = Koha::Database->new->schema->resultset('Suggestion')->find($suggestion->{suggestionid}); |
| 547 |
my $status_update_table = 1; |
547 |
eval { # FIXME Must raise an exception instead |
| 548 |
eval { |
|
|
| 549 |
$rs->update($suggestion); |
548 |
$rs->update($suggestion); |
| 550 |
}; |
549 |
}; |
| 551 |
$status_update_table = 0 if( $@ ); |
550 |
return 0 if $@; |
| 552 |
|
551 |
|
| 553 |
if ( $suggestion->{STATUS} ) { |
552 |
if ( $suggestion->{STATUS} ) { |
| 554 |
|
553 |
|
|
Lines 584-590
sub ModSuggestion {
Link Here
|
| 584 |
) or warn "can't enqueue letter $letter"; |
583 |
) or warn "can't enqueue letter $letter"; |
| 585 |
} |
584 |
} |
| 586 |
} |
585 |
} |
| 587 |
return $status_update_table; |
586 |
return 1; # No useful if the exception is raised earlier |
| 588 |
} |
587 |
} |
| 589 |
|
588 |
|
| 590 |
=head2 ConnectSuggestionAndBiblio |
589 |
=head2 ConnectSuggestionAndBiblio |
| 591 |
- |
|
|