Initial revision

diff --git a/src/lib/Spong/Message/plugins/msg_email b/src/lib/Spong/Message/plugins/msg_email
new file mode 100755 (executable)
index 0000000..94620be
--- /dev/null
+++ b/src/lib/Spong/Message/plugins/msg_email
@@ -0,0 +1,16 @@
+# Messing function for regular e-mail using the e-mail status
+# function
+
+$MSGFUNCS{'email'} = \&msg_email;
+
+sub msg_email {
+   my ($email) = @_;
+
+   &email_status($email);
+   &debug( "mail message sent to $email" );
+}
+
+# Required becuase I'm included perl code
+1;
+
+

diff --git a/src/lib/Spong/Message/plugins/msg_teletouch b/src/lib/Spong/Message/plugins/msg_teletouch
new file mode 100755 (executable)
index 0000000..0859a09
--- /dev/null
+++ b/src/lib/Spong/Message/plugins/msg_teletouch
@@ -0,0 +1,15 @@
+# Messaging function for Teletouch pagers using e-mail delivery via
+# the e-mail status function
+
+$MSGFUNCS{'teletouch'} = \&msg_teletouch;
+
+sub msg_teletouch {
+   my ($pager) = @_;
+
+   &email_status("$pager\@pageme.teletouch.com",'shortsubject');
+   &debug( "teletouch page sent to $pager" );
+}
+
+# Required becuase I'm included perl code
+1;
+

diff --git a/src/lib/Spong/Message/plugins/msg_teletouch_short b/src/lib/Spong/Message/plugins/msg_teletouch_short
new file mode 100755 (executable)
index 0000000..4b43377
--- /dev/null
+++ b/src/lib/Spong/Message/plugins/msg_teletouch_short
@@ -0,0 +1,15 @@
+# Message function for Teletouch pagers using e-mail delivery
+# but using the e-mail mini status function instead. This is a
+
+$MSGFUNCS{'teletouch_short'} = \&msg_teletouch_short;
+
+sub msg_teletouch_short {
+   my ($pager) = @_;
+
+   &email_mini_status("$pager\@pageme.teletouch.com",'shortsubject');
+   &debug( "teletouch short page sent to $pager" );
+}
+
+# Required becuase I'm included perl code
+1;
+