work around missing id, RT#83146

[freeside.git] / FS / bin / freeside-selfservice-xmlrpcd

diff --git a/FS/bin/freeside-selfservice-xmlrpcd b/FS/bin/freeside-selfservice-xmlrpcd
index e9df407..7ec72e9 100755 (executable)
--- a/FS/bin/freeside-selfservice-xmlrpcd
+++ b/FS/bin/freeside-selfservice-xmlrpcd
@@ -1,5 +1,11 @@
 #!/usr/bin/perl
 
+=head1 NAME
+
+freeside-selfservice-xmlrpcd
+
+=cut
+
 use FS::Daemon::Preforking qw( freeside_init1 freeside_init2 daemon_run );
 
 use FS::XMLRPC_Lite; #XMLRPC::Lite for XMLRPC::Serializer
@@ -44,6 +50,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;
   }
 );