X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_svc.pm;h=a565ee45bab6af3d5a8f85bfdf8fc8ba2f1fd908;hb=fe10e6c6a2e5de7a2ff468497790d2a317ec0c77;hp=b82996e0d67359c78b19200d76ea792288ec1172;hpb=7ecaf988ed810746534bf85abde34022f2b5d6b2;p=freeside.git diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm index b82996e0d..a565ee45b 100644 --- a/FS/FS/part_svc.pm +++ b/FS/FS/part_svc.pm @@ -57,7 +57,7 @@ FS::Record. The following fields are currently supported: =item svcdb - table used for this service. See L, L, and L, among others. -=item classnum - Optional service class (see L) +=item classnum - Optional service class (see L) =item disabled - Disabled flag, empty or `Y' @@ -707,6 +707,11 @@ sub _svc_defs { warn "skipping disabled service FS::$mod" if $DEBUG; next; } + + foreach ("FS::$mod"->virtual_fields_hash) { + $info->{'fields'}->{$_->{'name'}} = $_->{'label'}; + } + $info{$mod} = $info; # all svc_* modules are required to have h_svc_* modules for invoice