Make secret stuff more secret

This commit is contained in:
Pragmatic Software 2016-11-17 18:34:11 -08:00
parent e37b48822b
commit a5bb523f96
1 changed files with 1 additions and 1 deletions

View File

@ -138,7 +138,7 @@ sub initialize {
$self->{registry}->load;
my @chars = ("A".."Z", "a".."z", "0".."9");
$self->{secretstuff} = $chars[rand @chars] for 1..32;
$self->{secretstuff} .= $chars[rand @chars] for 1..64;
# create implicit bot-admin account for bot
my $botnick = $self->{registry}->get_value('irc', 'botnick');