From a5bb523f96c2badbed8788c0ecb20b72af3d91f6 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Thu, 17 Nov 2016 18:34:11 -0800
Subject: [PATCH] Make secret stuff more secret

---
 PBot/PBot.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PBot/PBot.pm b/PBot/PBot.pm
index 765dbafe..400ab628 100644
--- a/PBot/PBot.pm
+++ b/PBot/PBot.pm
@@ -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');