# TODO only allow registered users?
if ($no_page) {
- &main::status('page module requires Mail::Mailer.');
+ &::status('page module requires Mail::Mailer.');
return 'page module not active';
}
}
my $channel = $::chan || 'infobot';
- # TODO disallow use from private message? $chan="_default"
+ # TODO disallow use from private message? $chan='_default'
- &main::status("pager: from $from <$fromaddr>, to $to <$toaddr>, msg \"$msg\"");
+ &::status("pager: from $from <$fromaddr>, to $to <$toaddr>, msg \"$msg\"");
my %headers = (
To => "$to <$toaddr>",
From => "$from <$fromaddr>",
Subject => "Message from $channel!",
- 'X-Mailer' => "blootbot",
+ 'X-Mailer' => 'infobot',
);
# my $logmsg;
# $logmsg .= "$_: $headers{$_}\n";
# }
# $logmsg .= "\n$msg\n";
-# &main::status("pager:\n$logmsg");
+# &::status("pager:\n$logmsg");
my $failed;
my $mailer = new Mail::Mailer 'sendmail';
&::performStrictReply($retval);
}
-"pager";
+'pager';
# vim: ts=2 sw=2