Email-article.php
<? if ($event == 'data') {
if (xwGetProperty($properties, 'sendarticle/sent', $sent)) { if (ereg('@',$sent)) xwMessage("Article sent to $sent", 'green'); else xwMessage("Error sending article: $sent", 'red'); }
elseif (xwGetProperty($properties, 'sendarticle/to', $GLOBALS['sa-email'])) { # If mail not sent but we have details, prepare for sending on view event xwSetProperty($properties, 'xpath:/properties:view', 'class.phpmailer.php'); xwSetProperty($properties, 'xpath:/properties:view', $tTitle); $_REQUEST['printable'] = true; }
else { # Not sent and no details either, render input form xwSetProperty($properties, 'language', 'raw'); if (in_array('postmasters', $GLOBALS['xwUserGroups'])) { # Get available mail-lists from Contact Lists category using List-Cat code xwSetProperty($properties, 'list-cat', 'Contact Lists'); $tmp = $article; $article = "<option selected>or select a Contact List</option>\n"; eval( '?>'.xwArticleContent('List-Cat.php').'<?' ); $lists = str_replace('*[[', '<option>', $article); $lists = str_replace(']]', '</option>', $lists); $lists = " <select name=xpath:/properties/sendarticle:list>$lists</select>"; $article = $tmp; } else $lists = ; $article = "<form action=\"$script\" method=\"GET\"> <input type=hidden name=title value=\"$title\"> <input type=hidden name=xpath:/properties:data value=\"$tTitle\"> <input type=hidden name=xpath:/properties:sendarticle> <input type=text name=xpath:/properties/sendarticle:to size=30 value=\"Enter email address\"> $lists <input type=checkbox value=no name=xpath:/properties/sendarticle:textonly>text-only
You can also include a message before the article here if you like:
<textarea name=xpath:/properties/sendarticle:msg rows=5 cols=30></textarea>
<input type=submit value=\" Send \">
</form>";
}
}
else {
# Replace msg-token with user article url and msg
$utitle = urlencode($title);
xwGetProperty($properties, 'sendarticle/msg', $msg);
xwGetProperty($properties, 'sendarticle/textonly', $textonly);
if ($textonly) {
$html = false;
$article = "$msg\n\n".xwArticleContent( $title, true );
}
else {
$html = true;
$msg = htmlentities($msg)."
Article source : <a href=\"$script/$utitle\">$script/$utitle</a>";
$article = str_replace($GLOBALS['xwMsgToken'], "$msg
", $article);
# Replace stylesheet-token with embedded stylesheets xwReplaceTokens($article, true); # Absoluterise relative urls Absolute url of wiki $article = str_replace('"/wiki/', '"http://'.$_SERVER['HTTP_HOST'].'/wiki/', $article); }
# Set up new mailer instance $mail = new PHPMailer(); $mail->From = $GLOBALS['wgUser']->mEmail; $mail->FromName = $GLOBALS['xwUserName']; $mail->IsHTML($html); foreach ( split('[,;]', $GLOBALS['sa-email']) as $i ) $mail->AddAddress( trim($i) ); $mail->Subject = $title; $mail->Body = $article;
# Send message and redirect client back to article or raise error $msg = $mail->Send() ? $GLOBALS['sa-email'] : $mail->ErrorInfo; header("Location: $script?title=$utitle&xpath:/properties:data=$tTitle&xpath:/properties:sendarticle&xpath:/properties/sendarticle:sent=$msg"); } ?>
