COWbrowse

You are in an outbox

Hi,

Im your friendly email server and anything you GIVE me which is FOR someone I will email it out to them.

look for the 'sample email' to see how to prepare an email for posting.

Example:
1. create a piece of news for wm@wolispace.com
2. edit it (and type in your message)
3. give it to the outbox

Note: You must have a valid email address set for your user. You can update your email address when you login, just type in your user name, password and email before you click on the login button. or myemail to edit it while in cow.

Created by wolis, last updated 28 Nov 2008

Code

##gives:runsub chkme;

##chkme:
if $second eq $actor then itsme else end;

##itsme:
set $target's pose to "hiding";
var $email_to to $target's extra;
rem swap $email_to so "@" is "\\@";
if $email_to like "@" then sendemail else findplayer;

##findplayer:
find 0,$email_to;
var $email_to eq $found_id's email;

runsub sendemail;

##sendemail:

var $email_from to $init_obj's email;
say 'msg',"[$actor] sends [$target] to $email_to from $email_from";
var $email_subject to $target's class;
var $email_message to $target's info;
swap $email_to so "for " is "";
swap $email_to so "to " is "";
email now;
rem the now string does nothing for now but is needed;