View | Details | Raw Unified | Return to bug 17648
Collapse All | Expand All

(-)a/members/memberentry.pl (-3 / +3 lines)
Lines 30-36 use C4::Context; Link Here
30
use C4::Output qw( output_and_exit output_and_exit_if_error output_html_with_http_headers );
30
use C4::Output qw( output_and_exit output_and_exit_if_error output_html_with_http_headers );
31
use C4::Members qw( checkcardnumber get_cardnumber_length );
31
use C4::Members qw( checkcardnumber get_cardnumber_length );
32
use C4::Koha qw( GetAuthorisedValues );
32
use C4::Koha qw( GetAuthorisedValues );
33
use C4::Letters qw( SendAlerts );
33
use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages );
34
use C4::Form::MessagingPreferences;
34
use C4::Form::MessagingPreferences;
35
use Koha::AuthUtils;
35
use Koha::AuthUtils;
36
use Koha::AuthorisedValues;
36
use Koha::AuthorisedValues;
Lines 478-484 if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){ Link Here
478
                        want_librarian => 1,
478
                        want_librarian => 1,
479
                    ) or return;
479
                    ) or return;
480
480
481
                    my $success = EnqueueLetter(
481
                    my $message_id = EnqueueLetter(
482
                        {
482
                        {
483
                            letter                 => $letter,
483
                            letter                 => $letter,
484
                            borrowernumber         => $patron->id,
484
                            borrowernumber         => $patron->id,
Lines 486-491 if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){ Link Here
486
                            message_transport_type => 'email'
486
                            message_transport_type => 'email'
487
                        }
487
                        }
488
                    );
488
                    );
489
                    SendQueuedMessages({ message_id => $message_id });
489
                };
490
                };
490
                if ($@) {
491
                if ($@) {
491
                    $template->param( error_alert => $@ );
492
                    $template->param( error_alert => $@ );
492
- 

Return to bug 17648