Another batch of changes... see the ChangeLog!

git-svn-id: svn://vndb.org/vndb@10 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b

3 files changed, 6 insertions, 26 deletions

diff --git a/lib/Multi/IRC.pm b/lib/Multi/IRC.pm
index 4643a8fb..b8f6d44b 100644
--- a/lib/Multi/IRC.pm
+++ b/lib/Multi/IRC.pm
@@ -157,23 +157,3 @@ sub shutdown {
 1;
 
 
-
-__END__
-
-# debug
-sub _default {
-  my($event,$args) = @_[ ARG0 .. $#_ ];
-  my $arg_number = 0;
-  for (@$args) {
-    print "  ARG$arg_number = ";
-    if ( ref($_) eq 'ARRAY' ) {
-      print "$_ = [", join ( ", ", @$_ ), "]\n";
-    }
-    else {
-      print "'".($_||'')."'\n";
-    }
-    $arg_number++;
-  }
-  return 0;
-}
-
diff --git a/lib/Multi/RG.pm b/lib/Multi/RG.pm
index 4931ef96..b32fedba 100644
--- a/lib/Multi/RG.pm
+++ b/lib/Multi/RG.pm
@@ -34,8 +34,8 @@ sub _start {
   $_[KERNEL]->alias_set('rg');
   $_[KERNEL]->call(core => register => qr/^relgraph ((?:[0-9]+)(?:\s+[0-9]+)*|all)$/, 'cmd_relgraph');
 
- # regenerate all relation graphs twice a month (every 1st and 15nd day at 03:00)
-  $_[KERNEL]->post(core => addcron => '0 3 1,15 * *', 'relgraph all');
+ # regenerate all relation graphs once a month
+  $_[KERNEL]->post(core => addcron => '0 3 1 * *', 'relgraph all');
 }
 
 
diff --git a/lib/Multi/Sitemap.pm b/lib/Multi/Sitemap.pm
index 24981910..991244fd 100644
--- a/lib/Multi/Sitemap.pm
+++ b/lib/Multi/Sitemap.pm
@@ -88,8 +88,8 @@ sub vnpages {
   |);
   $q->execute;
   while(local $_ = $q->fetchrow_arrayref) {
-    $_[KERNEL]->call(sitemap => addurl => 'v/'.$_->[0], 'w', $_->[1], 0.7);
-    $_[KERNEL]->call(sitemap => addurl => 'v/'.$_->[0].'/rg', 'w', $_->[1], 0.7) if $_->[2];
+    $_[KERNEL]->call(sitemap => addurl => 'v'.$_->[0], 'w', $_->[1], 0.7);
+    $_[KERNEL]->call(sitemap => addurl => 'v'.$_->[0].'/rg', 'w', $_->[1], 0.7) if $_->[2];
   }
 
   $_[KERNEL]->yield('releasepages');
@@ -107,7 +107,7 @@ sub releasepages {
   |);
   $q->execute;
   while(local $_ = $q->fetchrow_arrayref) {
-    $_[KERNEL]->call(sitemap => addurl => 'r/'.$_->[0], 'w', $_->[1], 0.3);
+    $_[KERNEL]->call(sitemap => addurl => 'r'.$_->[0], 'w', $_->[1], 0.3);
   }
 
   $_[KERNEL]->yield('producerpages');
@@ -125,7 +125,7 @@ sub producerpages {
   |); 
   $q->execute;
   while(local $_ = $q->fetchrow_arrayref) {
-    $_[KERNEL]->call(sitemap => addurl => 'p/'.$_->[0], 'w', $_->[1]);
+    $_[KERNEL]->call(sitemap => addurl => 'p'.$_->[0], 'w', $_->[1]);
   }
 
   $_[KERNEL]->yield('finish');