@ISA = qw(FS::Record);
-$DEBUG = 0;
+$DEBUG = 1;
=head1 NAME
=item def_label - Optional description of the field in the context of service definitions
-=item type - Currently "text", "select", "disabled", or "radius_usergroup_selector"
+=item type - Currently "text", "select", "checkbox", "textarea", "disabled",
+some components specified by "select-.*.html", and a bunch more...
=item disable_default - This field should not allow a default value in service definitions
my $param = thaw(decode_base64(shift));
warn Dumper($param) if $DEBUG;
+ local($FS::svc_Common::noexport_hack) = 1
+ if $param->{'noexport'};
+
my $old_part_svc =
qsearchs('part_svc', { 'svcpart' => $param->{'old_svcpart'} } );