summaryrefslogtreecommitdiff
path: root/httemplate/edit/part_svc.cgi
diff options
context:
space:
mode:
authorivan <ivan>2003-11-03 11:42:32 +0000
committerivan <ivan>2003-11-03 11:42:32 +0000
commit47c39af359fc93c777714a5c50a6183747b66da9 (patch)
tree7830b8b808c70a31cd57771d37e5108bddfc3bbe /httemplate/edit/part_svc.cgi
parent36f038b92a2cc9c8f7bc52a2e11c00dbb7ed6ce0 (diff)
does this fix Bug#590??
Diffstat (limited to 'httemplate/edit/part_svc.cgi')
-rwxr-xr-xhttemplate/edit/part_svc.cgi36
1 files changed, 17 insertions, 19 deletions
diff --git a/httemplate/edit/part_svc.cgi b/httemplate/edit/part_svc.cgi
index e033a7b09..18319b341 100755
--- a/httemplate/edit/part_svc.cgi
+++ b/httemplate/edit/part_svc.cgi
@@ -131,25 +131,23 @@ my %defs = (
},
);
- #comment this out until it can be fixed, see bug#590
- #
- #foreach my $svcdb (grep dbdef->table($_), keys %defs ) {
- # my $self = "FS::$svcdb"->new;
- # $vfields{$svcdb} = {};
- # foreach my $field ($self->virtual_fields) { # svc_Common::virtual_fields with a null svcpart returns all of them
- # my $pvf = $self->pvf($field);
- # my @list = $pvf->list;
- # if (scalar @list) {
- # $defs{$svcdb}->{$field} = { desc => $pvf->label,
- # type => 'select',
- # select_list => \@list };
- # } else {
- # $defs{$svcdb}->{$field} = $pvf->label;
- # } #endif
- # $vfields{$svcdb}->{$field} = $pvf;
- # warn "\$vfields{$svcdb}->{$field} = $pvf";
- # } #next $field
- #} #next $svcdb
+ foreach my $svcdb (grep dbdef->table($_), keys %defs ) {
+ my $self = "FS::$svcdb"->new;
+ $vfields{$svcdb} = {};
+ foreach my $field ($self->virtual_fields) { # svc_Common::virtual_fields with a null svcpart returns all of them
+ my $pvf = $self->pvf($field);
+ my @list = $pvf->list;
+ if (scalar @list) {
+ $defs{$svcdb}->{$field} = { desc => $pvf->label,
+ type => 'select',
+ select_list => \@list };
+ } else {
+ $defs{$svcdb}->{$field} = $pvf->label;
+ } #endif
+ $vfields{$svcdb}->{$field} = $pvf;
+ warn "\$vfields{$svcdb}->{$field} = $pvf";
+ } #next $field
+ } #next $svcdb
my @dbs = $hashref->{svcdb}
? ( $hashref->{svcdb} )