header->from); $date = getLongDateString($message->header->date); // we can clean these up if the list is too long... $cc = decodeHeader(getLineOfAddrs($message->header->cc)); $to = decodeHeader(getLineOfAddrs($message->header->to)); // and Body and Subject could easily stream off the page... $body = mime_fetch_body($imap_stream, $passed_id, $passed_ent_id); $body = str_replace("\n", "\n", trim(decodeBody($body, $message->header->encoding))); $subject = trim(decodeHeader($message->header->subject)); // now, if they choose to, we clean up the display a bit... if ( empty($pf_cleandisplay) || $pf_cleandisplay != 'no' ) { $num_leading_spaces = 9; // nine leading spaces for indentation // sometimes I see ',,' instead of ',' seperating addresses *shrug* $cc = pf_clean_string(str_replace(',,', ',', $cc), $num_leading_spaces); $to = pf_clean_string(str_replace(',,', ',', $to), $num_leading_spaces); // the body should have no leading zeros $body = pf_clean_string($body, 0); // clean up everything else... $subject = pf_clean_string($subject, $num_leading_spaces); $from = pf_clean_string($from, $num_leading_spaces); $date = pf_clean_string($date, $num_leading_spaces); } // end cleanup // --end display setup-- // --start browser output-- displayHtmlHeader( _("Printer Friendly"), '', FALSE ); echo "
\n" . // headers (we use table becasue translations are not all the same width) '' . _("From") . ': | ' . htmlentities($from) . " | \n". '
' . _("To") . ': | ' . htmlentities($to) . " | \n"; if ( strlen($cc) > 0 ) { // only show CC: if it's there... echo '
' . _("CC") . ': | ' . htmlentities($cc) . " | \n"; } echo '
' . _("Date") . ': | ' . htmlentities($date) . " | \n". '
' . _("Subject") . ': | ' . htmlentities($subject) . " | \n". '
"; // body echo "
\n"; echo htmlentities($body); // --end browser output-- ?>