[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