# Messasing function for Alltel SMS service using e-mail delivery via
# the e-mail mini status, because SMS messages are limited

$MSGFUNCS{'alltelsms'} = \&msg_alltelsms;

sub msg_alltelsms {
   my ($phone,$subject,$body) = @_;

   &email("$phone\@message.alltel.com",$subject,$body);
   &debug( "alltel sms page sent to $phone" );
}

# Required becuase I'm included perl code
1;

