Commit 7793f7f1 authored by Côme Chilliet's avatar Côme Chilliet

🚑 fix(argonaut-user-reminder) Fix perl error

issue #5753
parent 5b89a0f1
......@@ -457,7 +457,7 @@ sub alert_user_if_needed
# Check if we already sent an email.
my ($token_hash, $token_datetime) = get_ldap_token($ldap, $entry->get_value('uid'));
if ($mode eq 'expired') {
if ($token_hash eq '{EXPIRED}') {
if ((defined $token_hash) && ($token_hash eq '{EXPIRED}')) {
$log->info("User $cn was already sent a mail of expiration, not resending.");
return;
}
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment