diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2018-02-09 18:53:03 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2018-02-09 18:53:03 -0800 |
| commit | 85c3e3aae188b29fa09690ce101de81597b53edd (patch) | |
| tree | 5e79102f68be09d632c27b55555e68c6a915c2f6 /FS/FS/cdr.pm | |
| parent | 00ca6edb07f337b3e8c8dcab087730f11ce18372 (diff) | |
journal cdrbatch -> cdrbatchnum upgrade
Diffstat (limited to 'FS/FS/cdr.pm')
| -rw-r--r-- | FS/FS/cdr.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm index 844b7fd..f545632 100644 --- a/FS/FS/cdr.pm +++ b/FS/FS/cdr.pm @@ -1877,9 +1877,12 @@ sub process_batch_import { # # Used by FS::Upgrade to migrate to a new database. +use FS::upgrade_journal; sub _upgrade_data { my ($class, %opts) = @_; + return if FS::upgrade_journal->is_done('cdr_cdrbatchnum'); + warn "$me upgrading $class\n" if $DEBUG; my $sth = dbh->prepare( @@ -1907,6 +1910,8 @@ sub _upgrade_data { $sth->execute($cdrbatchnum{$cdrbatch}, $cdrbatch) or die $sth->errstr; } + FS::upgrade_journal->set_done('cdr_cdrbatchnum'); + } =item ip_addr_sql FIELD RANGE |