projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 76398 - Fixed sybase connection and cleaned up code
[freeside.git]
/
FS
/
bin
/
freeside-xmlrpcd
diff --git
a/FS/bin/freeside-xmlrpcd
b/FS/bin/freeside-xmlrpcd
index
e22d0f0
..
e4e0334
100644
(file)
--- a/
FS/bin/freeside-xmlrpcd
+++ b/
FS/bin/freeside-xmlrpcd
@@
-6,9
+6,6
@@
use FS::XMLRPC_Lite; #XMLRPC::Lite for XMLRPC::Serializer
#and XMLRPC::Transport::HTTP
use FS::Conf;
#and XMLRPC::Transport::HTTP
use FS::Conf;
-
-##use FS::ClientAPI qw( load_clientapi_modules );
-##use FS::ClientAPI_XMLRPC; #FS::SelfService::XMLRPC;
use FS::API;
#freeside xmlrpc.cgi
use FS::API;
#freeside xmlrpc.cgi
@@
-19,17
+16,9
@@
my %typelookup = (
);
use constant ME => 'xmlrpcd';
);
use constant ME => 'xmlrpcd';
-
-#
-
freeside_init1(ME);
freeside_init1(ME);
-
-#load_clientapi_modules;
-
freeside_init2(ME);
freeside_init2(ME);
-#FS::ClientAPI::Signup::clear_cache();
-
my $conf = new FS::Conf;
die "not running; xmlrpc_api conf option is off\n"
unless $conf->exists('xmlrpc_api');
my $conf = new FS::Conf;
die "not running; xmlrpc_api conf option is off\n"
unless $conf->exists('xmlrpc_api');
@@
-51,6
+40,8
@@
daemon_run( 'port' => 8008, '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;
}
);