From 56c1d58315608899cd5bcdb98798e36374524d27 Mon Sep 17 00:00:00 2001
From: heuzef <contact@heuzef.com>
Date: Fri, 9 Feb 2018 09:45:02 +0100
Subject: [PATCH] update whitelist

---
 defacement_check.pl | 27 +++++++++++++--------------
 1 file changed, 13 insertions(+), 14 deletions(-)

diff --git a/defacement_check.pl b/defacement_check.pl
index 725f752..9ae00ae 100644
--- a/defacement_check.pl
+++ b/defacement_check.pl
@@ -94,22 +94,21 @@ foreach $file (@files)
     my @found;
     my $total_found = 0;
 
-    foreach my $s (@search) {                         # Pour chaque keywords-black dans la liste
 
-      foreach (grep(/$s/i, split(/\n/, $site))) {     # Pour chaque URL faire une recherche du keywords-black
-
-        foreach my $i (@whitelist) {
-          if($_ =~ m/$i/i) {
-            print "\033[35mIGNORE ";
-          } else {
-            push @found, $_;
-          }
+    foreach my $s (@search) {
+      foreach (grep(/$s/i, split(/\n/, $site))) {
+        # foreach my $i (@whitelist) {
+        #
+        # }
+        my $i = "prolibre";
+        if($_ =~ m/$i/i) {
+          print "\033[35mIGNORE ";
         }
-
-
-      }                                               # Pour chaque URL faire une recherche du keywords-black
-
-    }                                                 # Pour chaque keywords-black dans la liste
+        else {
+          push @found, $_;
+        }
+      }
+    }
 
     # Results
     foreach (uniq(@found)) {