httemplate/edit/svc_mailinglist.cgi

   1 <% include( 'elements/svc_Common.html',
   2               'table'  => 'svc_mailinglist',
   3               'fields' => \@fields,
   4           )
   5 %>
   6 <%init>
   7
   8 die "access denied"
   9   unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
  10
  11 my @fields = (
  12   'username',
  13   { field=>'domsvc',           type=>'select-svc-domain',
  14     #label => 'List address domain',
  15   },
  16   { field=>'listnum',          type=>'hidden', },
  17   { field=>'listname',         type=>'text', },
  18   { field=>'reply_to',         type=>'checkbox', value=>'Y' },
  19   { field=>'remove_from',      type=>'checkbox', value=>'Y' },
  20   { field=>'reject_auto',      type=>'checkbox', value=>'Y' },
  21   { field=>'remove_to_and_cc', type=>'checkbox', value=>'Y' },
  22
  23 );
  24
  25 </%init>