|
Lines 88-93
if ( $op eq 'send_welcome' ) {
Link Here
|
| 88 |
} |
88 |
} |
| 89 |
); |
89 |
); |
| 90 |
}; |
90 |
}; |
|
|
91 |
} else { |
| 92 |
eval { |
| 93 |
my $print = GetPreparedLetter( |
| 94 |
module => 'members', |
| 95 |
letter_code => 'WELCOME', |
| 96 |
branchcode => $patron->branchcode,, |
| 97 |
lang => $patron->lang || 'default', |
| 98 |
tables => { |
| 99 |
'branches' => $patron->branchcode, |
| 100 |
'borrowers' => $patron->borrowernumber, |
| 101 |
}, |
| 102 |
want_librarian => 1, |
| 103 |
message_transport_type => 'print' |
| 104 |
) or return; |
| 105 |
|
| 106 |
my $message_id = EnqueueLetter( |
| 107 |
{ |
| 108 |
letter => $print, |
| 109 |
borrowernumber => $patron->id, |
| 110 |
message_transport_type => 'print' |
| 111 |
} |
| 112 |
); |
| 113 |
}; |
| 91 |
} |
114 |
} |
| 92 |
|
115 |
|
| 93 |
# redirect to self to avoid form submission on refresh |
116 |
# redirect to self to avoid form submission on refresh |
| 94 |
- |
|
|