update sourceforge download list script

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

diff --git a/docs/tools/sf2bacula_downloads.pl b/docs/tools/sf2bacula_downloads.pl
index 94d9f553a023890b5d80d96d754bfd9490b2c3f2..23e2dc17c138ec9940acefc66189a530d39ed744 100755 (executable)
--- a/docs/tools/sf2bacula_downloads.pl
+++ b/docs/tools/sf2bacula_downloads.pl
@@ -51,7 +51,7 @@ while (my $l = <FP>)
 {
     #                                         cat   vers  file
     if ($l =~ m!href="(/projects/bacula/files/(.+?)/(.+?)/(.+?)/download)"!) {
-        if ($cur && !exists $seen{$cur->{file}}) {
+        if ($cur && $cur->{date} && !exists $seen{$cur->{file}}) {
             push @{$cats{$cur->{cat}}}, $cur;
             $seen{$cur->{file}} = 1;
         }
@@ -65,7 +65,7 @@ while (my $l = <FP>)
     }
 
     # the size and the date are just after
-    if ($l =~ m!<td>([\d\.]+ [KMG]iB)</td>!) {
+    if ($l =~ m!<td>([\d\.]+ [KMG]B)</td>!) {
         $cur->{size} = $1;
         do {
             $l = <FP>;