--- nfo/perl/libs/OEF/Component/WebService/RpcXml.pm	2003/07/01 18:11:15	1.5
+++ nfo/perl/libs/OEF/Component/WebService/RpcXml.pm	2003/07/02 11:00:40	1.6
@@ -1,7 +1,10 @@
 ##  ------------------------------------------------------------------------
-##  $Id: RpcXml.pm,v 1.5 2003/07/01 18:11:15 joko Exp $
+##  $Id: RpcXml.pm,v 1.6 2003/07/02 11:00:40 jonen Exp $
 ##  ------------------------------------------------------------------------
 ##  $Log: RpcXml.pm,v $
+##  Revision 1.6  2003/07/02 11:00:40  jonen
+##  fixed: die now if http-port is used by other app
+##
 ##  Revision 1.5  2003/07/01 18:11:15  joko
 ##  fixed: renamed package name according to new filenames
 ##
@@ -65,6 +68,9 @@
       }
     );
     
+    #print Dumper($self->{_daemon}) . "\n";
+    if(!ref($self->{_daemon})) { die($self->{_daemon} . ", maybe same daemon or other daemon on same port is already running??" . "\n"); }
+    
   # API
   
     # 1. load api module