Commit 9a31b34c authored by sikeda's avatar sikeda
Browse files

[-dev] Suppress warnings on uninitialized value.


git-svn-id: https://subversion.renater.fr/sympa/branches/sympa-6.2-branch@12067 05aa8bb8-cd2b-0410-b1d7-8918dfa770ce
parent 55675ad6
......@@ -502,9 +502,9 @@ sub get_tag {
$name = '*';
}
return
substr(Digest::MD5::md5_hex(join '/', $Conf::Conf{'cookie'}, $name),
-10);
my $cookie = $Conf::Conf{'cookie'};
$cookie = '' unless defined $cookie;
return substr(Digest::MD5::md5_hex(join '/', $cookie, $name), -10);
}
1;
Supports Markdown
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