X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fpart_export.pm;h=45773e097cc97e4a4ebdf94db503c54340bac092;hp=4b60953cf902e5300620032c55a79127e4ce855d;hb=e4388387dcd23701294438b468ad60b92d61f34d;hpb=e243f4541c78a033c4f969a03d29b9da84829d97 diff --git a/FS/FS/part_export.pm b/FS/FS/part_export.pm index 4b60953cf..45773e097 100644 --- a/FS/FS/part_export.pm +++ b/FS/FS/part_export.pm @@ -473,6 +473,12 @@ sub _upgrade_data { #class method $error = $opt->replace; die $error if $error; } + # pass downstream + my %exports_in_use; + $exports_in_use{ref $_} = 1 foreach qsearch('part_export', {}); + foreach (keys(%exports_in_use)) { + $_->_upgrade_exporttype(%opts) if $_->can('_upgrade_exporttype'); + } } #=item exporttype2svcdb EXPORTTYPE