projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 82087 - added logging for decode json error
[freeside.git]
/
FS
/
bin
/
freeside-selfservice-xmlrpcd
diff --git
a/FS/bin/freeside-selfservice-xmlrpcd
b/FS/bin/freeside-selfservice-xmlrpcd
index
6413b2b
..
7e373a0
100755
(executable)
--- 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 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;
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';
use constant ME => 'selfservice-xmlrpcd';
-#
-
freeside_init1(ME);
load_clientapi_modules;
freeside_init1(ME);
load_clientapi_modules;
@@
-47,6
+44,8
@@
daemon_run( 'port' => 8080, 'handle_request' =>
$soap->request($request);
$soap->handle;
$soap->request($request);
$soap->handle;
+ $FS::UID::dbh->commit() if $FS::UID::dbh; #XXX handle commit error
+
return $soap->response;
}
);
return $soap->response;
}
);