From: Stephen L Johnson <sjohnson@monsters.org>
Date: Thu, 21 Oct 1999 21:16:07 +0000 (+0000)
Subject: Initial import
X-Git-Tag: start~38
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1c71eaa9ece113ec829be989179526b66f134b97;p=spong.git

Initial import
---

diff --git a/src/lib/Spong/Message/plugins/msg_alltelsms b/src/lib/Spong/Message/plugins/msg_alltelsms
new file mode 100755
index 0000000..ea89f04
--- /dev/null
+++ b/src/lib/Spong/Message/plugins/msg_alltelsms
@@ -0,0 +1,15 @@
+# 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) = @_;
+
+   &email_mini_status("$phone\@message.alltel.com",'shortsubject');
+   &debug( "alltel sms page sent to $phone" );
+}
+
+# Required becuase I'm included perl code
+1;
+
diff --git a/src/lib/Spong/Message/plugins/msg_skytel b/src/lib/Spong/Message/plugins/msg_skytel
new file mode 100755
index 0000000..047ff36
--- /dev/null
+++ b/src/lib/Spong/Message/plugins/msg_skytel
@@ -0,0 +1,15 @@
+# Messaging function skytel pagers using e-mail delivery via
+# the e-mail status function
+
+$MSGFUNCS{'skytel'} = \&msg_skytel;
+
+sub msg_skytel {
+   my($skytel) = @_;
+
+   &email_status("$skytel\@skytel.net");
+   &debug( "skytel page sent to $skytel" );
+}
+
+# Required becuase I'm included perl code
+1;
+