Anonymous

// ---- now set headers with variables set above:

	$headers = "From: $listAdminEmail" . "\r\n" . "Reply-To: $listAdminEmail" . "\r\n" . 'X-Mailer: PHP/' . phpversion()  . "\r\n" . "MIME-Version: 1.0" . "\r\n" . 'Content-Type: text/plain; charset="UTF-8"' . "\r\n" . "Content-Transfer-Encoding: 8bit";

	$semi_rand = md5(time());
	$mime_boundary = "==Multipart_Boundary_x{$semi_rand}x";

// ---- now set the form:

	$listEmailForm = trim($listEmailForm);

	if (empty($listEmailForm)) {

$listEmailForm = <<<eop_form

<txp:bab_pm_data display="author" /> has posted a new article at <txp:site_url />.

Read article at: <txp:bab_pm_data display="link" />

Unsubscribe: <txp:bab_pm_unsubscribeLink />

eop_form;

	} else {
		$listEmailForm = fetch('Form','txp_form','name',"$listEmailForm");
	}

// ---- mail function -----------------------------

	echo '<div class=bab_pm_alerts>';
	$i=1;
		foreach($subscribers as $subscriber) {
			if ($i <= bab_pm_preferences('emails_per_batch')) {
//			if ($i <= 50) {

				@extract($subscriber);
				if (empty($subscriberName)) { $subscriberName = "Subscriber"; }
				$listUnsubscribeUrl = trim($listUnsubscribeUrl);
	   			if (!empty($listUnsubscribeUrl)) {
					$bab_pm_unsubscribeLink = $listUnsubscribeUrl . "&uid=" . $unsubscribeID;
				}
				else $bab_pm_unsubscribeLink = '';
				$parsed_listEmailForm = parse($listEmailForm);

// fix line breaks [added sicher's fix]

				$parsed_listEmailForm = str_replace("\r\n", "\n", $parsed_listEmailForm);