or die "Illegal notenum: ". $cgi->param('notenum');
my $notenum = $1;
+my $comment = $cgi->param('comment_html') ||
+ join("<br />\n",
+ split "(?:\r|\n)+", $cgi->param('comment_plain')
+ );
+
my $otaker = $FS::CurrentUser::CurrentUser->name;
$otaker = $FS::CurrentUser::CurrentUser->username
if ($otaker eq "User, Legacy");
custnum => $custnum,
_date => time,
otaker => $otaker,
- comments => $cgi->param('comment'),
+ comments => $comment,
} );
my $error;