#####
sub readUserFile {
- my $f = "$bot_misc_dir/blootbot.users";
+ my $f = "$bot_state_dir/blootbot.users";
if (! -f $f) {
&DEBUG("userfile not found; new fresh run detected.");
return;
}
- if (!open OUT,">$bot_misc_dir/blootbot.users") {
+ if (!open OUT,">$bot_state_dir/blootbot.users") {
&ERROR("cannot write to userfile.");
return;
}
#####
sub readChanFile {
- my $f = "$bot_misc_dir/blootbot.chan";
+ my $f = "$bot_state_dir/blootbot.chan";
if ( -f $f and -f "$f~") {
my $s1 = -s $f;
my $s2 = -s "$f~";
return;
}
- if (!open OUT,">$bot_misc_dir/blootbot.chan") {
+ if (!open OUT,">$bot_state_dir/blootbot.chan") {
&ERROR("cannot write chanfile.");
return;
}