      }
  
      INFO("Connected to server '" . $self->server . "' successfully");
-@@ -443,12 +460,14 @@
+@@ -443,12 +464,14 @@
  sub JoinForum {
      my $self = shift;
      my $forum_name = shift;

 has 'forum_join_time'        => (isa => HashRef[Int], is => 'rw', default => sub{{}}); # List of when we joined each forum
 has 'out_messages_per_second' => (isa => PosNum, is => 'rw', default => sub{5});
 has 'message_delay'           => (isa => PosNum, is => 'rw', default => sub {1/5});
@@ -67,6 +68,10 @@
 has 'max_message_size'        => (isa => HundredInt, is => 'rw', default => 1000000);
 has 'max_messages_per_hour'   => (isa => PosInt,     is => 'rw', default => 1000000);
 

 =back
 
 =cut
@@ -422,7 +443,7 @@
     $self->Process(5);
 
     foreach my $forum (keys %{$self->forums_and_responses}) {
