[freeside-commits] freeside/FS/FS/part_export communigate_pro.pm, 1.16.4.17, 1.16.4.18
Ivan,,,
ivan at wavetail.420.am
Wed Jun 23 16:06:10 PDT 2010
Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail.420.am:/tmp/cvs-serv10126/part_export
Modified Files:
Tag: FREESIDE_1_9_BRANCH
communigate_pro.pm
Log Message:
fix domain renames, RT#7083
Index: communigate_pro.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/communigate_pro.pm,v
retrieving revision 1.16.4.17
retrieving revision 1.16.4.18
diff -u -w -d -r1.16.4.17 -r1.16.4.18
--- communigate_pro.pm 23 May 2010 01:59:21 -0000 1.16.4.17
+++ communigate_pro.pm 23 Jun 2010 23:06:08 -0000 1.16.4.18
@@ -383,12 +383,16 @@
sub _export_replace_svc_domain {
my( $self, $new, $old ) = (shift, shift, shift);
+ #let's just do the rename part realtime rather than trying to queue
+ #w/dependencies. we don't want FS winding up out-of-sync with the wrong
+ #username and a queued job anyway. right??
if ( $old->domain ne $new->domain ) {
- my $error = $self->communigate_pro_queue( $new->svcnum, 'RenameDomain',
- $old->domain, $new->domain,
- );
- return $error if $error;
+ eval { $self->communigate_pro_runcommand(
+ 'RenameDomain', $old->domain, $new->domain,
+ ) };
+ return $@ if $@;
}
+
my %settings = ();
$settings{'AccountsLimit'} = $new->max_accounts
if $old->max_accounts ne $new->max_accounts;
More information about the freeside-commits
mailing list