Delete links during make clean

[bacula/docs] / docs / tools / sf2bacula_downloads.pl

diff --git a/docs/tools/sf2bacula_downloads.pl b/docs/tools/sf2bacula_downloads.pl
index fad7bb4f9dfa835670bb8cb1836530e9209d1b89..72d7bdd9d334c7c2c0f493178c516fffe0cd7066 100755 (executable)
--- a/docs/tools/sf2bacula_downloads.pl
+++ b/docs/tools/sf2bacula_downloads.pl
@@ -24,11 +24,11 @@ You can also use a previous output
 =cut
 
 #             bacula|depkgs | depkgs-qt
-my $version = '5.0.0';
+my $version = '5.0.1';
 if ($ARGV[0] and $ARGV[0] =~ /^[\d\.]+$/) {
     $version = shift(@ARGV);
 }
-my $depkgs_version  = '18Dec09|28Jul09';
+my $depkgs_version  = '18Dec09|28Jul09|15May10';
 
 my $base = "http://bacula.git.sourceforge.net/git/gitweb.cgi?p=bacula/bacula;a=blob_plain;hb=Release-$version;f=bacula";
 my $notes = "$base/ReleaseNotes";
@@ -50,7 +50,7 @@ open(FP, $file);
 while (my $l = <FP>)
 {
     #                                         cat   vers  file
-    if ($l =~ m!href="(/projects/bacula/files/([^/]+)/([^/]+)/([^/]+)/download)"!) {
+    if ($l =~ m!href="(?:http://sourceforge.net)(/projects/bacula/files/([^/]+)/([^/]+)/([^/]+)/download)"!) {
         print STDERR "$4\n";
         $cur = {
             dl  => $1,
@@ -91,6 +91,8 @@ close(FP);
 
 print '
 <? require_once("inc/header.php"); ?>
+<? // This page is generated by sf2bacula_downloads.pl in eric s crontab, 
+   // no need to update it by hand ?>
 <table>
   <tr>
    <td class="contentTopic">
@@ -162,5 +164,6 @@ print_cat('depkgs-qt');
 
 print '
 </table>
+<small>', scalar(localtime), '</small>
 <? require_once("inc/footer.php"); ?>
 ';