X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FModules%2Fpager.pl;h=3d211754e93d86cdffca58a9477f167a5adecae6;hb=dc498609afa162c127a4e31529e9725734278d0b;hp=1753401ae25b03474fc1e814b9defc7246a1d966;hpb=3f40dc29b75c6b70cb95d17e4cd78bbf9f6c8bf9;p=infobot.git

diff --git a/src/Modules/pager.pl b/src/Modules/pager.pl
index 1753401..3d21175 100644
--- a/src/Modules/pager.pl
+++ b/src/Modules/pager.pl
@@ -31,7 +31,7 @@ sub pager::page {
 	# 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';
 	}
 
@@ -66,7 +66,7 @@ sub pager::page {
 		my $channel = $::chan || 'infobot';
 		# 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>",
@@ -79,7 +79,7 @@ sub pager::page {
 #			$logmsg .= "$_: $headers{$_}\n";
 #		}
 #		$logmsg .= "\n$msg\n";
-#		&main::status("pager:\n$logmsg");
+#		&::status("pager:\n$logmsg");
 
 		my $failed;
 		my $mailer = new Mail::Mailer 'sendmail';