--- nfo/perl/libs/OEF/Component/WebService/RpcXml.pm	2003/07/02 11:00:40	1.6
+++ nfo/perl/libs/OEF/Component/WebService/RpcXml.pm	2004/07/06 00:45:18	1.7
@@ -1,7 +1,10 @@
 ##  ------------------------------------------------------------------------
-##  $Id: RpcXml.pm,v 1.6 2003/07/02 11:00:40 jonen Exp $
+##  $Id: RpcXml.pm,v 1.7 2004/07/06 00:45:18 joko Exp $
 ##  ------------------------------------------------------------------------
 ##  $Log: RpcXml.pm,v $
+##  Revision 1.7  2004/07/06 00:45:18  joko
+##  disabled RPC::XML::SessionServer (TODO: reactivate!)
+##
 ##  Revision 1.6  2003/07/02 11:00:40  jonen
 ##  fixed: die now if http-port is used by other app
 ##
@@ -33,6 +36,7 @@
 
 use Data::Dumper;
 use RPC::XML;
+use RPC::XML::Server;
 use RPC::XML::SessionServer;
 use RPC::XML::Procedure;
 use Data::Mungle::Code::Symbol qw( alias_simple );
@@ -55,7 +59,8 @@
   $instance_counter++;
 
   # here goes the server instance
-    $self->{_daemon} = RPC::XML::SessionServer->new(
+    #$self->{_daemon} = RPC::XML::SessionServer->new(
+    $self->{_daemon} = RPC::XML::Server->new(
       port => $self->{ws_port},
       path => $self->{ws_path} || 'WebService' . $instance_counter,
       auto_updates => 1,