@@ -, +, @@ --- C4/Auth_with_ldap.pm | 4 +++- C4/Auth_with_shibboleth.pm | 3 ++- 2 files changed, 5 insertions(+), 2 deletions(-) --- a/C4/Auth_with_ldap.pm +++ a/C4/Auth_with_ldap.pm @@ -23,7 +23,7 @@ use Carp qw( croak ); use C4::Context; use C4::Members::Messaging; use C4::Auth qw( checkpw_internal ); -use C4::Letters qw( GetPreparedLetter EnqueueLetter ); +use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages ); use Koha::Patrons; use Koha::AuthUtils qw( hash_password ); use Net::LDAP; @@ -260,6 +260,8 @@ sub checkpw_ldap { message_transport_type => 'email' } ); + + C4::Letters::SendQueuedMessages( { message_id => $message_id } ); } } } else { --- a/C4/Auth_with_shibboleth.pm +++ a/C4/Auth_with_shibboleth.pm @@ -23,7 +23,7 @@ use C4::Context; use Koha::AuthUtils qw( get_script_name ); use Koha::Database; use Koha::Patrons; -use C4::Letters qw( GetPreparedLetter EnqueueLetter ); +use C4::Letters qw( GetPreparedLetter EnqueueLetter SendQueuedMessages ); use C4::Members::Messaging; use Carp qw( carp ); use List::MoreUtils qw( any ); @@ -169,6 +169,7 @@ sub _autocreate { message_transport_type => 'email' } ); + C4::Letters::SendQueuedMessages( { message_id => $message_id } ); } } return ( 1, $patron->cardnumber, $patron->userid ); --