diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc index a625834163..d530fc5758 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc +++ b/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc @@ -81,7 +81,7 @@ [% END %] [% IF CAN_user_borrowers_edit_borrowers %] -
  • Send welcome email
  • +
  • Send welcome notice
  • [% END %] [% IF CAN_user_borrowers_edit_borrowers && patron.category.effective_reset_password %] diff --git a/members/notices.pl b/members/notices.pl index 2e455f7c19..10fe4fc2ad 100755 --- a/members/notices.pl +++ b/members/notices.pl @@ -88,6 +88,29 @@ if ( $op eq 'send_welcome' ) { } ); }; + } else { + eval { + my $print = GetPreparedLetter( + module => 'members', + letter_code => 'WELCOME', + branchcode => $patron->branchcode,, + lang => $patron->lang || 'default', + tables => { + 'branches' => $patron->branchcode, + 'borrowers' => $patron->borrowernumber, + }, + want_librarian => 1, + message_transport_type => 'print' + ) or return; + + my $message_id = EnqueueLetter( + { + letter => $print, + borrowernumber => $patron->id, + message_transport_type => 'print' + } + ); + }; } # redirect to self to avoid form submission on refresh