X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main_note.cgi;h=18d59e9518b30a78cf8c48bdcd5f5940004c019b;hb=5f9edcbe9fb3b3eb905614927aa6120d50c06ff1;hp=6c6a1a9a0ec2a1f1aa2120caa19afa52e9b27252;hpb=40a7b3dc653e099f7bd0bd762b649b04c4432db2;p=freeside.git diff --git a/httemplate/edit/cust_main_note.cgi b/httemplate/edit/cust_main_note.cgi index 6c6a1a9a0..18d59e951 100755 --- a/httemplate/edit/cust_main_note.cgi +++ b/httemplate/edit/cust_main_note.cgi @@ -6,14 +6,44 @@ +% if (my @noteclasses = qsearch('cust_note_class',{ 'disabled' => '' })) { +% my %noteclassopts = $conf->exists('cust_main_note-require_class') +% ? ('disable_empty' => 1) +% : ('empty_label' => '(unclassified)'); + Class   + <% include( '/elements/select-table.html', + 'table' => 'cust_note_class', + 'records' => \@noteclasses, + 'name_col' => 'classname', + 'curr_value' => $classnum, + %noteclassopts, + ) %> +
+% } -

- +% if ( $FS::CurrentUser::CurrentUser->option('disable_html_editor') ) { + +% } else { + <& /elements/htmlarea.html, + 'field' => 'comment_html', + 'curr_value' => $comment, + 'config' => { toolbarStartupExpanded => Cpanel::JSON::XS::false, + height => 315, + }, + &> +% } -

-"> +
+ +<& /elements/checkbox.html, 'field' => 'sticky', + 'value' => 1, + 'curr_value' => $sticky, +&> +Sticky note

+ +"> @@ -21,19 +51,28 @@ <%init> +my $conf = new FS::Conf; + my $comment; my $notenum = ''; +my $classnum; +my $sticky = 0; if ( $cgi->param('error') ) { $comment = $cgi->param('comment'); + $classnum = $cgi->param('classnum'); } elsif ( $cgi->param('notenum') =~ /^(\d+)$/ ) { $notenum = $1; die "illegal query ". $cgi->keywords unless $notenum; my $note = qsearchs('cust_main_note', { 'notenum' => $notenum }); die "no such note: ". $notenum unless $note; $comment = $note->comments; + $classnum = $note->classnum; + $sticky = $note->sticky; } -$cgi->param('custnum') =~ /^(\d+)$/ or die "illeagl custnum"; +$comment =~ s/\r//g; # remove weird line breaks to protect FCKeditor + +$cgi->param('custnum') =~ /^(\d+)$/ or die "illegal custnum"; my $custnum = $1; my $action = $notenum ? 'Edit' : 'Add';