vpnmain.cgi: Disable compression by default

[ipfire-2.x.git] / tools / checknewlog.pl

diff --git a/tools/checknewlog.pl b/tools/checknewlog.pl
index 14d2cf711c4ddd6c6c4d80dd779a3c05bd6a2be5..abf4613fb39811c30107c8c6f475581fbe0e3c2a 100755 (executable)
--- a/tools/checknewlog.pl
+++ b/tools/checknewlog.pl
@@ -2,7 +2,7 @@
 ###############################################################################
 #                                                                             #
 # IPFire.org - A linux based firewall                                         #
-# Copyright (C) 2008  Michael Tremer & Christian Schmidt                      #
+# Copyright (C) 2007-2017  IPFire Team  <info@ipfire.org>                     #
 #                                                                             #
 # This program is free software: you can redistribute it and/or modify        #
 # it under the terms of the GNU General Public License as published by        #
@@ -25,15 +25,24 @@ my @FILES = readdir(DIR);
 closedir(DIR);
 
 foreach(@FILES) {
-                                       my $Found = 0;
-                                       if ( $_ =~ /$\.log/ || $_ =~ /^\.+/ ){next;}
-#                                      print $_."\n";
-                                       open(DATEI, "<./log/$_") || die "File not found";
-                                       my @Lines = <DATEI>;
-                                       close(DATEI);
-                                       foreach (@Lines){
-                                                                       if ( $_ =~ /^\+/ ){$Found=1;}
-                                                                       
-                                       }
-                                       if ($Found){print "Changes in $_ check rootfile!\n";}
+#      print $_."\n";
+       my $Found = 0;
+
+       if ( $_ =~ /$\.log/ || $_ =~ /^\.+/  || $_=~ /-install/ || $_=~ /-tools/ || $_=~ /-config/ || $_=~ /-kmod-/|| $_=~ /coreutils/ || $_=~ /cmake/ || $_=~ /libsigc/ || $_ eq 'FILES' ){
+               next;
+       } elsif ( $_=~ /missing_rootfile/ ){
+               print "Rootfile for $_ missing!\n";
+       } else {
+               open(DATEI, "<./log/$_") || die "File not found";
+               my @Lines = <DATEI>;
+               close(DATEI);
+
+               foreach (@Lines){
+                       if ( $_ =~ /^\+/ ){$Found=1;}
+               }
+
+               if ($Found){
+                       print "Changes in $_ check rootfile!\n";
+               }
+       }
 }