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