From 695fa16abbbc8a790b3e597af0bd08e1363e4bc6 Mon Sep 17 00:00:00 2001
From: Andreas Brachold <vdr07@deltab.de>
Date: Sun, 21 Oct 2007 18:22:07 +0000
Subject: * Reorder startup from SHARE web service (swap order Up/Download)

---
 lib/XXV/MODULES/SHARE.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'lib')

diff --git a/lib/XXV/MODULES/SHARE.pm b/lib/XXV/MODULES/SHARE.pm
index 107c4c1..7b01601 100644
--- a/lib/XXV/MODULES/SHARE.pm
+++ b/lib/XXV/MODULES/SHARE.pm
@@ -134,7 +134,12 @@ sub _init {
                 lg sprintf('Popularity web service has time offset %d seconds.',$offset);
               }
             }
+        }
+        return 1;
+    }, "SHARE: Connect to popularity web service ...",4) if($obj->{active} eq 'y');
 
+    main::after(sub{
+        if($obj->{SOAP}) {
             $obj->getSoapData();
             Event->timer(
               interval => $obj->{interval},
@@ -145,7 +150,7 @@ sub _init {
             );
         }
           return 1;
-    }, "SHARE: Connect to popularity web service ...",4) if($obj->{active} eq 'y');
+    }, "SHARE: Update data with popularity web service ...",48) if($obj->{active} eq 'y');
 
     return 1;
 }
-- 
cgit v1.2.3