-% }
-%
-%#subroutines
-%
-%sub note_datestr {
-% my($note, $conf, $bgcolor) = @_ or return '';
-% my $format=qq{<TD class="inv" bgcolor="$bgcolor" align="left"><B>%b</B></TD>}.
-% qq{<TD class="inv" bgcolor="$bgcolor" align="right"><B> %o,</B></TD>}.
-% qq{<TD class="inv" bgcolor="$bgcolor" align="right"><B> %Y </B></TD>};
-% $format .= qq{<TD class="inv" bgcolor="$bgcolor" ALIGN="right"><B> %l</TD>}.
-% qq{<TD class="inv" bgcolor="$bgcolor" ALIGN="center"><B>:</B></TD>}.
-% qq{<TD class="inv" bgcolor="$bgcolor" ALIGN="left"><B>%M</B></TD>}.
-% qq{<TD class="inv" bgcolor="$bgcolor" ALIGN="left"><B> %P </B></TD>}
-% if $conf->exists('cust_main_note-display_times');
-% ( my $strip = time2str($format, $note->_date) ) =~ s/ (\d)/$1/g;
-% $strip;
+% if ( $curuser->access_right('View email logs')
+% and FS::cust_msg->count("custnum = $custnum")) {
+<BR>
+<& notes/email.html, 'cust_main' => $cust_main &>
+<BR>