[freeside-commits] freeside/FS/FS svc_domain.pm,1.54,1.55

[Richard Siddall]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv2771/FS/FS

Modified Files:
	svc_domain.pm 
Log Message:
New export to register/transfer/renew/revoke domains using Net::DRI. 
Currently optimized for OpenSRS.  Should become more generalized in later
releases.  Modified Makefile to insert the Freeside log folder into the new
export.  Modified svc_domain.pm to prevent generation of transfer requests
when a domain is moved to a different package with a domain registration
attached to one of the included services.  Modified domreg.cgi to display
errors on a separate page.


Index: svc_domain.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_domain.pm,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -d -r1.54 -r1.55
--- svc_domain.pm	15 May 2009 19:41:33 -0000	1.54
+++ svc_domain.pm	14 Jul 2009 00:28:05 -0000	1.55
@@ -300,7 +300,7 @@
     if $old->getfield('domain') ne $new->getfield('domain'); 
 
   # Better to do it here than to force the caller to remember that svc_domain is weird.
-  $new->setfield(action => 'M');
+  $new->setfield(action => 'I');
   my $error = $new->SUPER::replace($old, @_);
   return $error if $error;
 }