[project @ peter@palfrader.org-20090203194431-hb6wyt4tciij3zgs]
authorPeter Palfrader <peter@palfrader.org>
Tue, 3 Feb 2009 19:44:31 +0000 (19:44 +0000)
committerPeter Palfrader <peter@palfrader.org>
Tue, 3 Feb 2009 19:44:31 +0000 (19:44 +0000)
Copy string before messing with it to check the ignorelist

dsa-nagios-nrpe-config/dsa-check-packages

index d3073b1..9233ae6 100755 (executable)
@@ -141,7 +141,8 @@ sub check_ignore {
        my ($pkg, $ignores) = @_;
 
        my $ignore_this = 0;
-       for my $ig (@$ignores) {
+       for my $ignore (@$ignores) {
+               my $ig = $ignore;
                return 1 if ($ig eq $pkg);
                if (substr($ig,0,1) eq '/') {
                        substr($ig, 0, 1, '');