X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-selfservice-xmlrpcd;h=7e373a0c370b1f9915b0a0f2f8761259f7f82662;hp=6413b2b8ac653b3372e89a4c382a28af49ea6f57;hb=bb7e827141c9ed68f30765c9ca2ddcd1d760ad2d;hpb=e9e0cf0989259b94d9758eceff448666a2e5a5cc

diff --git a/FS/bin/freeside-selfservice-xmlrpcd b/FS/bin/freeside-selfservice-xmlrpcd
index 6413b2b8a..7e373a0c3 100755
--- a/FS/bin/freeside-selfservice-xmlrpcd
+++ b/FS/bin/freeside-selfservice-xmlrpcd
@@ -2,9 +2,8 @@
 
 use FS::Daemon::Preforking qw( freeside_init1 freeside_init2 daemon_run );
 
-use XMLRPC::Transport::HTTP; #SOAP::Transport::HTTP;
-use XMLRPC::Lite; # for XMLRPC::Serializer
-
+use FS::XMLRPC_Lite; #XMLRPC::Lite for XMLRPC::Serializer
+                     #and XMLRPC::Transport::HTTP
 use FS::Conf;
 use FS::ClientAPI qw( load_clientapi_modules );
 use FS::ClientAPI_XMLRPC; #FS::SelfService::XMLRPC;
@@ -18,8 +17,6 @@ my %typelookup = (
 
 use constant ME => 'selfservice-xmlrpcd';
 
-#
-
 freeside_init1(ME);
 
 load_clientapi_modules;
@@ -47,6 +44,8 @@ daemon_run( 'port' => 8080, 'handle_request' =>
     $soap->request($request);
     $soap->handle;
 
+    $FS::UID::dbh->commit() if $FS::UID::dbh; #XXX handle commit error
+
     return $soap->response;
   }
 );