do not have uninitialised variable

diff --git a/cgi b/cgi
index 4495a872791b77675c6dd3c9cf996738f8c6eef7..81cd9a389b39d307350b0f6fc0e309b4f3454cde 100755 (executable)
--- a/cgi
+++ b/cgi
@@ -171,8 +171,8 @@ foreach my $src (sort { news_name_sortkey($a) cmp news_name_sortkey($b) }
     $site =~ s/^([-.0-9a-z]+)_//;
     my $us= $1; # all very well but we ignore it
     my $newsite= $news_name_map{$site,$inout};
-    next if $newsite eq '-';
     $site= $newsite if defined $newsite;
+    next if $site eq '-';
     graph_of_group("News", $site, $inout,
          {
                Slower => 1,