$MSGFUNCS{'alltelsms'} = \&msg_alltelsms;
sub msg_alltelsms {
- my ($phone) = @_;
+ my ($phone,$subject,$body) = @_;
- &email_mini_status("$phone\@message.alltel.com",'shortsubject');
+ &email("$phone\@message.alltel.com",$subject,$body);
&debug( "alltel sms page sent to $phone" );
}
$MSGFUNCS{'email'} = \&msg_email;
sub msg_email {
- my ($email) = @_;
+ my ($email,$subject,$body) = @_;
- &email_status($email);
+ &email($email,$subject,$body);
&debug( "mail message sent to $email" );
}
$MSGFUNCS{'skytel'} = \&msg_skytel;
sub msg_skytel {
- my($skytel) = @_;
+ my($skytel,$subject,$body) = @_;
- &email_status("$skytel\@skytel.net");
+ &email("$skytel\@skytel.net",$subject,$body);
&debug( "skytel page sent to $skytel" );
}
$MSGFUNCS{'teletouch'} = \&msg_teletouch;
sub msg_teletouch {
- my ($pager) = @_;
+ my ($pager,$subject,$body) = @_;
- &email_status("$pager\@pageme.teletouch.com",'shortsubject');
+ &email("$pager\@pageme.teletouch.com",$subject,$body);
&debug( "teletouch page sent to $pager" );
}
$MSGFUNCS{'teletouch_short'} = \&msg_teletouch_short;
sub msg_teletouch_short {
- my ($pager) = @_;
+ my ($pager,$subject,$body) = @_;
- &email_mini_status("$pager\@pageme.teletouch.com",'shortsubject');
+ &email("$pager\@pageme.teletouch.com",$subject,$body);
&debug( "teletouch short page sent to $pager" );
}